/ The Datafile PD-CD 3 / PDCD_3.iso / internet / rnfilters / ka9q->rucp

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 6b | 61 39 71 2d 3e 72 75 63 |..... >k|a9q->ruc|
|00000010| 70 0d 00 14 04 0d 00 1e | 1a f4 20 50 72 6f 67 72 |p.......|.. Progr|
|00000020| 61 6d 3a 20 20 6b 61 39 | 71 2d 3e 72 75 63 70 0d |am:  ka9|q->rucp.|
|00000030| 00 28 13 f4 20 56 65 72 | 73 69 6f 6e 3a 20 20 30 |.(.. Ver|sion:  0|
|00000040| 2e 36 0d 00 32 1b f4 20 | 44 61 74 65 3a 20 20 20 |.6..2.. |Date:   |
|00000050| 20 20 32 39 2d 44 65 63 | 2d 31 39 39 33 0d 00 3c |  29-Dec|-1993..<|
|00000060| 1d f4 20 41 75 74 68 6f | 72 3a 20 20 20 50 61 75 |.. Autho|r:   Pau|
|00000070| 6c 20 4c 2e 20 41 6c 6c | 65 6e 0d 00 46 31 f4 20 |l L. All|en..F1. |
|00000080| 50 75 72 70 6f 73 65 3a | 20 20 6b 61 39 71 20 74 |Purpose:|  ka9q t|
|00000090| 6f 20 72 75 63 70 20 6d | 61 69 6c 20 61 6e 64 20 |o rucp m|ail and |
|000000a0| 6e 65 77 73 20 66 69 6c | 74 65 72 0d 00 50 39 f4 |news fil|ter..P9.|
|000000b0| 20 43 6f 70 79 72 69 67 | 68 74 20 a9 20 31 39 39 | Copyrig|ht . 199|
|000000c0| 33 20 50 61 75 6c 20 4c | 2e 20 41 6c 6c 65 6e 2c |3 Paul L|. Allen,|
|000000d0| 20 61 6c 6c 20 72 69 67 | 68 74 73 20 72 65 73 65 | all rig|hts rese|
|000000e0| 72 76 65 64 0d 00 5a 04 | 0d 00 64 0e f4 20 48 69 |rved..Z.|..d.. Hi|
|000000f0| 73 74 6f 72 79 3a 0d 00 | 6e 2b f4 20 20 20 20 20 |story:..|n+.     |
|00000100| 56 65 72 73 69 6f 6e 20 | 30 2e 32 3a 20 49 6e 69 |Version |0.2: Ini|
|00000110| 74 69 61 6c 20 62 65 74 | 61 2d 72 65 6c 65 61 73 |tial bet|a-releas|
|00000120| 65 0d 00 78 42 f4 20 20 | 20 20 20 56 65 72 73 69 |e..xB.  |   Versi|
|00000130| 6f 6e 20 30 2e 33 3a 20 | 41 64 64 65 64 20 6d 61 |on 0.3: |Added ma|
|00000140| 70 70 69 6e 67 20 6f 66 | 20 60 70 6f 73 74 6d 61 |pping of| `postma|
|00000150| 73 74 27 20 74 6f 20 60 | 70 6f 73 74 6d 61 73 74 |st' to `|postmast|
|00000160| 65 72 27 0d 00 82 4b f4 | 20 20 20 20 20 56 65 72 |er'...K.|     Ver|
|00000170| 73 69 6f 6e 20 30 2e 34 | 3a 20 41 64 64 65 64 20 |sion 0.4|: Added |
|00000180| 63 6f 64 65 20 74 6f 20 | 6c 6f 6f 6b 20 66 6f 72 |code to |look for|
|00000190| 20 6e 65 77 73 20 66 69 | 6c 65 73 20 69 6e 20 21 | news fi|les in !|
|000001a0| 4d 61 69 6c 44 69 72 2e | 66 6f 6c 64 65 72 0d 00 |MailDir.|folder..|
|000001b0| 8c 49 f4 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.I.     |        |
|000001c0| 20 20 20 20 20 61 73 20 | 77 65 6c 6c 20 61 73 20 |     as |well as |
|000001d0| 21 4d 61 69 6c 44 69 72 | 20 74 6f 20 63 6f 70 65 |!MailDir| to cope|
|000001e0| 20 77 69 74 68 20 6c 61 | 74 65 72 20 76 65 72 73 | with la|ter vers|
|000001f0| 69 6f 6e 73 20 6f 66 0d | 00 96 1c f4 20 20 20 20 |ions of.|....    |
|00000200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 6b 61 |        |      ka|
|00000210| 39 71 2e 0d 00 a0 48 f4 | 20 20 20 20 20 56 65 72 |9q....H.|     Ver|
|00000220| 73 69 6f 6e 20 30 2e 35 | 3a 20 4e 6f 77 20 72 65 |sion 0.5|: Now re|
|00000230| 6d 6f 76 65 73 20 22 3e | 22 20 66 72 6f 6d 20 6c |moves ">|" from l|
|00000240| 69 6e 65 73 20 73 74 61 | 72 74 69 6e 67 20 77 69 |ines sta|rting wi|
|00000250| 74 68 20 22 3e 46 72 6f | 6d 20 22 0d 00 aa 45 f4 |th ">Fro|m "...E.|
|00000260| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000270| 20 20 62 65 63 61 75 73 | 65 20 6b 61 39 71 20 61 |  becaus|e ka9q a|
|00000280| 64 64 73 20 61 20 22 3e | 22 20 74 6f 20 6c 69 6e |dds a ">|" to lin|
|00000290| 65 73 20 73 74 61 72 74 | 69 6e 67 20 77 69 74 68 |es start|ing with|
|000002a0| 0d 00 b4 48 f4 20 20 20 | 20 20 20 20 20 20 20 20 |...H.   |        |
|000002b0| 20 20 20 20 20 20 20 22 | 46 72 6f 6d 20 22 20 61 |       "|From " a|
|000002c0| 73 20 74 68 61 74 20 69 | 73 20 75 73 65 64 20 61 |s that i|s used a|
|000002d0| 73 20 74 68 65 20 6d 65 | 73 73 61 67 65 20 73 65 |s the me|ssage se|
|000002e0| 70 61 72 61 74 6f 72 2e | 0d 00 be 44 f4 20 20 20 |parator.|...D.   |
|000002f0| 20 20 56 65 72 73 69 6f | 6e 20 30 2e 36 3a 20 54 |  Versio|n 0.6: T|
|00000300| 43 50 49 50 20 6d 61 69 | 6c 20 6c 6f 63 6b 69 6e |CPIP mai|l lockin|
|00000310| 67 20 69 6d 70 6c 65 6d | 65 6e 74 65 64 20 70 72 |g implem|ented pr|
|00000320| 6f 70 65 72 6c 79 2e 20 | 20 4e 65 77 0d 00 c8 46 |operly. | New...F|
|00000330| f4 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000340| 20 20 20 6e 65 77 73 67 | 72 6f 75 70 20 66 69 6c |   newsg|roup fil|
|00000350| 65 20 3c 61 62 62 72 76 | 3e 4e 47 20 64 65 6c 65 |e <abbrv|>NG dele|
|00000360| 74 65 64 20 69 66 20 65 | 6d 70 74 79 2c 20 75 73 |ted if e|mpty, us|
|00000370| 65 72 0d 00 d2 45 f4 20 | 20 20 20 20 20 20 20 20 |er...E. |        |
|00000380| 20 20 20 20 20 20 20 20 | 20 69 6e 66 6f 72 6d 65 |        | informe|
|00000390| 64 20 69 66 20 6e 6f 74 | 20 65 6d 70 74 79 2e 20 |d if not| empty. |
|000003a0| 20 4e 65 77 73 20 61 6e | 64 20 6d 61 69 6c 20 74 | News an|d mail t|
|000003b0| 72 61 6e 73 66 65 72 0d | 00 dc 4c f4 20 20 20 20 |ransfer.|..L.    |
|000003c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 72 6f |        |      ro|
|000003d0| 75 74 69 6e 65 73 20 72 | 65 70 6c 61 63 65 64 20 |utines r|eplaced |
|000003e0| 77 69 74 68 20 64 6f 75 | 62 6c 65 2d 62 75 66 66 |with dou|ble-buff|
|000003f0| 65 72 65 64 20 72 6f 75 | 74 69 6e 65 73 20 63 6f |ered rou|tines co|
|00000400| 64 65 64 0d 00 e6 48 f4 | 20 20 20 20 20 20 20 20 |ded...H.|        |
|00000410| 20 20 20 20 20 20 20 20 | 20 20 69 6e 20 61 73 73 |        |  in ass|
|00000420| 65 6d 62 6c 65 72 20 2d | 20 65 6c 69 6d 69 6e 61 |embler -| elimina|
|00000430| 74 65 73 20 64 69 73 63 | 2d 74 68 72 61 73 68 69 |tes disc|-thrashi|
|00000440| 6e 67 20 61 6e 64 20 72 | 75 6e 73 0d 00 f0 47 f4 |ng and r|uns...G.|
|00000450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000460| 20 20 6d 75 63 68 20 66 | 61 73 74 65 72 2e 20 20 |  much f|aster.  |
|00000470| 4e 65 77 20 6e 65 77 73 | 20 72 6f 75 74 69 6e 65 |New news| routine|
|00000480| 73 20 63 6f 72 72 65 63 | 74 6c 79 20 68 61 6e 64 |s correc|tly hand|
|00000490| 6c 65 0d 00 fa 48 f4 20 | 20 20 20 20 20 20 20 20 |le...H. |        |
|000004a0| 20 20 20 20 20 20 20 20 | 20 6e 65 77 73 20 66 72 |        | news fr|
|000004b0| 6f 6d 20 6b 61 39 71 20 | 76 65 72 73 69 6f 6e 73 |om ka9q |versions|
|000004c0| 20 31 2e 32 32 20 61 6e | 64 20 61 62 6f 76 65 20 | 1.22 an|d above |
|000004d0| 61 73 20 77 65 6c 6c 20 | 61 73 0d 01 04 47 f4 20 |as well |as...G. |
|000004e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000004f0| 20 6f 6c 64 20 66 6f 72 | 6d 61 74 20 28 31 2e 32 | old for|mat (1.2|
|00000500| 31 29 20 6e 65 77 73 20 | 62 79 20 69 67 6e 6f 72 |1) news |by ignor|
|00000510| 69 6e 67 20 62 79 74 65 | 20 63 6f 75 6e 74 20 69 |ing byte| count i|
|00000520| 66 0d 01 0e 4a f4 20 20 | 20 20 20 20 20 20 20 20 |f...J.  |        |
|00000530| 20 20 20 20 20 20 20 20 | 70 72 65 73 65 6e 74 20 |        |present |
|00000540| 61 6e 64 20 63 61 6c 63 | 75 6c 61 74 69 6e 67 20 |and calc|ulating |
|00000550| 69 74 20 61 6e 65 77 2e | 20 20 4e 6f 20 6c 6f 6e |it anew.|  No lon|
|00000560| 67 65 72 20 72 65 6d 6f | 76 65 73 0d 01 18 49 f4 |ger remo|ves...I.|
|00000570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000580| 20 20 22 3e 22 20 66 72 | 6f 6d 20 6c 69 6e 65 73 |  ">" fr|om lines|
|00000590| 20 73 74 61 72 74 69 6e | 67 20 77 69 74 68 20 22 | startin|g with "|
|000005a0| 3e 46 72 6f 6d 20 22 20 | 73 6f 20 74 68 61 74 20 |>From " |so that |
|000005b0| 6d 61 69 6c 0d 01 22 44 | f4 20 20 20 20 20 20 20 |mail.."D|.       |
|000005c0| 20 20 20 20 20 20 20 20 | 20 20 20 68 61 6e 64 6c |        |   handl|
|000005d0| 69 6e 67 20 69 73 6e 27 | 74 20 73 6c 6f 77 65 64 |ing isn'|t slowed|
|000005e0| 20 64 6f 77 6e 2e 20 20 | 47 65 6e 65 72 61 6c 20 | down.  |General |
|000005f0| 74 69 64 79 2d 75 70 2e | 0d 01 2c 04 0d 01 36 09 |tidy-up.|..,...6.|
|00000600| f2 69 6e 69 74 0d 01 40 | 0d f2 61 73 73 65 6d 62 |.init..@|..assemb|
|00000610| 6c 65 0d 01 4a 0e ee 20 | 85 20 f2 65 72 72 6f 72 |le..J.. |. .error|
|00000620| 0d 01 54 17 e7 20 a4 69 | 6e 74 65 72 72 6f 67 61 |..T.. .i|nterroga|
|00000630| 74 65 5f 72 63 20 8c 0d | 01 5e 0b 20 20 f2 6d 61 |te_rc ..|.^.  .ma|
|00000640| 69 6c 0d 01 68 0b 20 20 | f2 6e 65 77 73 0d 01 72 |il..h.  |.news..r|
|00000650| 0e 20 20 f2 6e 65 77 6e | 65 77 73 0d 01 7c 05 cc |.  .newn|ews..|..|
|00000660| 0d 01 86 54 20 20 f2 69 | 6e 66 6f 5f 6d 73 67 28 |...T  .i|nfo_msg(|
|00000670| 22 50 72 6f 63 65 73 73 | 69 6e 67 20 61 62 6f 72 |"Process|ing abor|
|00000680| 74 65 64 20 64 75 65 20 | 74 6f 20 65 72 72 6f 72 |ted due |to error|
|00000690| 73 2f 6f 6d 69 73 73 69 | 6f 6e 73 20 69 6e 20 72 |s/omissi|ons in r|
|000006a0| 75 63 70 20 53 79 73 74 | 65 6d 52 43 20 66 69 6c |ucp Syst|emRC fil|
|000006b0| 65 2e 22 29 0d 01 90 05 | cd 0d 01 9a 05 e0 0d 01 |e.")....|........|
|000006c0| a4 04 0d 01 ae 0a dd f2 | 69 6e 69 74 0d 01 b8 10 |........|init....|
|000006d0| f2 63 6f 6d 6d 6f 6e 5f | 69 6e 69 74 0d 01 c2 a1 |.common_|init....|
|000006e0| 64 65 62 75 67 25 20 3d | 20 64 65 62 75 67 5f 66 |debug% =| debug_f|
|000006f0| 69 6c 65 6f 70 65 6e 25 | 20 84 20 64 65 62 75 67 |ileopen%| . debug|
|00000700| 5f 66 69 6c 65 63 6c 6f | 73 65 25 20 84 20 64 65 |_fileclo|se% . de|
|00000710| 62 75 67 5f 66 69 6c 65 | 64 65 6c 65 74 65 25 20 |bug_file|delete% |
|00000720| 84 20 64 65 62 75 67 5f | 66 69 6c 65 6c 6f 63 6b |. debug_|filelock|
|00000730| 25 20 84 20 64 65 62 75 | 67 5f 66 69 6c 65 75 6e |% . debu|g_fileun|
|00000740| 6c 6f 63 6b 25 20 84 20 | 64 65 62 75 67 5f 66 69 |lock% . |debug_fi|
|00000750| 6c 65 63 6f 70 79 25 20 | 84 20 64 65 62 75 67 5f |lecopy% |. debug_|
|00000760| 66 69 6c 65 72 65 6e 61 | 6d 65 25 20 84 20 64 65 |filerena|me% . de|
|00000770| 62 75 67 5f 66 69 6c 65 | 6d 6f 76 65 25 0d 01 cc |bug_file|move%...|
|00000780| 18 64 65 62 75 67 25 20 | 3d 20 64 65 62 75 67 5f |.debug% |= debug_|
|00000790| 6e 6f 6e 65 25 0d 01 d6 | 93 6d 63 64 65 62 75 67 |none%...|.mcdebug|
|000007a0| 25 20 3d 20 6d 63 64 65 | 62 75 67 5f 6c 69 73 74 |% = mcde|bug_list|
|000007b0| 69 6e 67 25 20 84 20 6d | 63 64 65 62 75 67 5f 74 |ing% . m|cdebug_t|
|000007c0| 72 61 63 65 69 70 62 75 | 66 25 20 84 20 6d 63 64 |raceipbu|f% . mcd|
|000007d0| 65 62 75 67 5f 74 72 61 | 63 65 6f 70 62 75 66 25 |ebug_tra|ceopbuf%|
|000007e0| 20 84 20 6d 63 64 65 62 | 75 67 5f 74 72 61 63 65 | . mcdeb|ug_trace|
|000007f0| 6d 73 67 73 65 70 25 20 | 84 20 6d 63 64 65 62 75 |msgsep% |. mcdebu|
|00000800| 67 5f 74 72 61 63 65 6e | 65 77 73 68 64 72 25 20 |g_tracen|ewshdr% |
|00000810| 84 20 6d 63 64 65 62 75 | 67 5f 74 72 61 63 65 6e |. mcdebu|g_tracen|
|00000820| 65 77 73 62 6f 64 79 25 | 0d 01 e0 1c 6d 63 64 65 |ewsbody%|....mcde|
|00000830| 62 75 67 25 20 3d 20 6d | 63 64 65 62 75 67 5f 6e |bug% = m|cdebug_n|
|00000840| 6f 6e 65 25 0d 01 ea 1c | 62 75 66 66 65 72 5f 73 |one%....|buffer_s|
|00000850| 69 7a 65 25 20 3d 20 39 | 36 20 2a 20 31 30 32 34 |ize% = 9|6 * 1024|
|00000860| 0d 01 f4 17 53 79 73 74 | 65 6d 5f 52 43 5f 66 69 |....Syst|em_RC_fi|
|00000870| 6c 65 25 20 3d 20 30 0d | 01 fe 15 6d 61 69 6c 5f |le% = 0.|...mail_|
|00000880| 69 6e 5f 66 69 6c 65 25 | 20 3d 20 30 0d 02 08 17 |in_file%| = 0....|
|00000890| 6d 61 69 6c 5f 6c 6f 63 | 6b 5f 66 69 6c 65 25 20 |mail_loc|k_file% |
|000008a0| 3d 20 30 0d 02 12 16 6d | 61 69 6c 5f 6f 75 74 5f |= 0....m|ail_out_|
|000008b0| 66 69 6c 65 25 20 3d 20 | 30 0d 02 1c 17 6e 65 77 |file% = |0....new|
|000008c0| 73 5f 77 6f 72 6b 5f 66 | 69 6c 65 25 20 3d 20 30 |s_work_f|ile% = 0|
|000008d0| 0d 02 26 16 6e 65 77 73 | 5f 6f 75 74 5f 66 69 6c |..&.news|_out_fil|
|000008e0| 65 25 20 3d 20 30 0d 02 | 30 2c f2 72 65 61 64 5f |e% = 0..|0,.read_|
|000008f0| 6f 73 76 61 72 28 22 4d | 61 69 6c 24 44 69 72 22 |osvar("M|ail$Dir"|
|00000900| 2c 20 54 43 50 49 50 5f | 6d 61 69 6c 5f 64 69 72 |, TCPIP_|mail_dir|
|00000910| 24 29 0d 02 3a 1c e7 20 | 54 43 50 49 50 5f 6d 61 |$)..:.. |TCPIP_ma|
|00000920| 69 6c 5f 64 69 72 24 20 | 3d 20 22 22 20 8c 0d 02 |il_dir$ |= "" ...|
|00000930| 44 39 20 20 f2 65 72 72 | 6f 72 5f 6d 73 67 28 22 |D9  .err|or_msg("|
|00000940| 4d 61 69 6c 44 69 72 20 | 61 70 70 6c 69 63 61 74 |MailDir |applicat|
|00000950| 69 6f 6e 20 68 61 73 20 | 6e 6f 74 20 62 65 65 6e |ion has |not been|
|00000960| 20 73 65 65 6e 22 29 0d | 02 4e 07 20 20 e0 0d 02 | seen").|.N.  ...|
|00000970| 58 05 cd 0d 02 62 26 f2 | 72 65 61 64 5f 6f 73 76 |X....b&.|read_osv|
|00000980| 61 72 28 22 72 75 63 70 | 24 44 69 72 22 2c 20 72 |ar("rucp|$Dir", r|
|00000990| 75 63 70 5f 64 69 72 24 | 29 0d 02 6c 16 e7 20 72 |ucp_dir$|)..l.. r|
|000009a0| 75 63 70 5f 64 69 72 24 | 20 3d 20 22 22 20 8c 0d |ucp_dir$| = "" ..|
|000009b0| 02 76 36 20 20 f2 65 72 | 72 6f 72 5f 6d 73 67 28 |.v6  .er|ror_msg(|
|000009c0| 22 72 75 63 70 20 61 70 | 70 6c 69 63 61 74 69 6f |"rucp ap|plicatio|
|000009d0| 6e 20 68 61 73 20 6e 6f | 74 20 62 65 65 6e 20 73 |n has no|t been s|
|000009e0| 65 65 6e 22 29 0d 02 80 | 07 20 20 e0 0d 02 8a 05 |een")...|.  .....|
|000009f0| cd 0d 02 94 2c 6d 61 69 | 6c 5f 69 6e 5f 6c 6f 63 |....,mai|l_in_loc|
|00000a00| 6b 5f 70 61 74 68 24 20 | 3d 20 22 2e 73 70 6f 6f |k_path$ |= ".spoo|
|00000a10| 6c 2e 6d 61 69 6c 2e 6c | 6f 63 6b 2e 22 0d 02 9e |l.mail.l|ock."...|
|00000a20| 2b 6d 61 69 6c 5f 69 6e | 5f 74 65 78 74 5f 61 72 |+mail_in|_text_ar|
|00000a30| 65 61 24 20 3d 20 22 2e | 73 70 6f 6f 6c 2e 6d 61 |ea$ = ".|spool.ma|
|00000a40| 69 6c 2e 74 65 78 74 22 | 0d 02 a8 22 6d 61 69 6c |il.text"|..."mail|
|00000a50| 5f 6f 75 74 5f 70 61 74 | 68 24 20 3d 20 22 2e 75 |_out_pat|h$ = ".u|
|00000a60| 75 63 70 2e 6d 61 69 6c | 2e 22 0d 02 b2 21 6e 65 |ucp.mail|."...!ne|
|00000a70| 77 73 5f 77 6f 72 6b 5f | 6e 61 6d 65 24 20 3d 20 |ws_work_|name$ = |
|00000a80| 22 72 75 63 70 2d 77 6f | 72 6b 22 0d 02 bc 22 6e |"rucp-wo|rk"..."n|
|00000a90| 65 77 73 5f 6f 75 74 5f | 70 61 74 68 24 20 3d 20 |ews_out_|path$ = |
|00000aa0| 22 2e 75 75 63 70 2e 6e | 65 77 73 2e 22 0d 02 c6 |".uucp.n|ews."...|
|00000ab0| 12 61 6c 69 67 6e 6d 65 | 6e 74 25 20 3d 20 38 0d |.alignme|nt% = 8.|
|00000ac0| 02 d0 16 e7 20 61 6c 69 | 67 6e 6d 65 6e 74 25 20 |.... ali|gnment% |
|00000ad0| 3c 20 35 20 8c 0d 02 da | 61 20 20 f2 65 72 72 6f |< 5 ....|a  .erro|
|00000ae0| 72 5f 6d 73 67 28 22 44 | 6f 6e 27 74 20 6d 65 73 |r_msg("D|on't mes|
|00000af0| 73 20 61 72 6f 75 6e 64 | 20 77 69 74 68 20 69 6e |s around| with in|
|00000b00| 74 65 72 6e 61 6c 20 63 | 6f 6e 73 74 61 6e 74 73 |ternal c|onstants|
|00000b10| 20 75 6e 6c 65 73 73 20 | 79 6f 75 20 6b 6e 6f 77 | unless |you know|
|00000b20| 20 77 68 61 74 20 79 6f | 75 27 72 65 20 64 6f 69 | what yo|u're doi|
|00000b30| 6e 67 2e 2e 22 29 0d 02 | e4 32 20 20 f2 69 6e 66 |ng..")..|.2  .inf|
|00000b40| 6f 5f 6d 73 67 28 22 20 | 20 61 6c 69 67 6e 6d 65 |o_msg(" | alignme|
|00000b50| 6e 74 25 20 6d 75 73 74 | 20 62 65 20 61 74 20 6c |nt% must| be at l|
|00000b60| 65 61 73 74 20 35 22 29 | 0d 02 ee 07 20 20 e0 0d |east 5")|....  ..|
|00000b70| 02 f8 05 cd 0d 03 02 26 | 61 6c 69 67 6e 6d 65 6e |.......&|alignmen|
|00000b80| 74 25 20 3d 20 28 31 20 | 3c 3c 20 61 6c 69 67 6e |t% = (1 |<< align|
|00000b90| 6d 65 6e 74 25 29 20 2d | 20 31 0d 03 0c 20 de 20 |ment%) -| 1... . |
|00000ba0| 69 6e 70 75 74 5f 62 75 | 66 66 65 72 25 20 62 75 |input_bu|ffer% bu|
|00000bb0| 66 66 65 72 5f 73 69 7a | 65 25 0d 03 16 21 de 20 |ffer_siz|e%...!. |
|00000bc0| 6f 75 74 70 75 74 5f 62 | 75 66 66 65 72 25 20 62 |output_b|uffer% b|
|00000bd0| 75 66 66 65 72 5f 73 69 | 7a 65 25 0d 03 20 2b e7 |uffer_si|ze%.. +.|
|00000be0| 20 62 75 66 66 65 72 5f | 73 69 7a 65 25 20 3c 20 | buffer_|size% < |
|00000bf0| 32 20 2a 20 28 61 6c 69 | 67 6e 6d 65 6e 74 25 20 |2 * (ali|gnment% |
|00000c00| 2b 20 31 29 20 8c 0d 03 | 2a 61 20 20 f2 65 72 72 |+ 1) ...|*a  .err|
|00000c10| 6f 72 5f 6d 73 67 28 22 | 44 6f 6e 27 74 20 6d 65 |or_msg("|Don't me|
|00000c20| 73 73 20 61 72 6f 75 6e | 64 20 77 69 74 68 20 69 |ss aroun|d with i|
|00000c30| 6e 74 65 72 6e 61 6c 20 | 63 6f 6e 73 74 61 6e 74 |nternal |constant|
|00000c40| 73 20 75 6e 6c 65 73 73 | 20 79 6f 75 20 6b 6e 6f |s unless| you kno|
|00000c50| 77 20 77 68 61 74 20 79 | 6f 75 27 72 65 20 64 6f |w what y|ou're do|
|00000c60| 69 6e 67 2e 2e 22 29 0d | 03 34 47 20 20 f2 69 6e |ing..").|.4G  .in|
|00000c70| 66 6f 5f 6d 73 67 28 22 | 20 20 62 75 66 66 65 72 |fo_msg("|  buffer|
|00000c80| 5f 73 69 7a 65 25 20 6d | 75 73 74 20 62 65 20 61 |_size% m|ust be a|
|00000c90| 74 20 6c 65 61 73 74 20 | 32 20 2a 20 28 61 6c 69 |t least |2 * (ali|
|00000ca0| 67 6e 6d 65 6e 74 25 20 | 2b 20 31 29 22 29 0d 03 |gnment% |+ 1)")..|
|00000cb0| 3e 07 20 20 e0 0d 03 48 | 05 cd 0d 03 52 21 63 6f |>.  ...H|....R!co|
|00000cc0| 6e 76 65 72 73 69 6f 6e | 5f 62 75 66 66 65 72 5f |nversion|_buffer_|
|00000cd0| 73 69 7a 65 25 20 3d 20 | 32 35 35 0d 03 5c 05 e1 |size% = |255..\..|
|00000ce0| 0d 03 66 04 0d 03 70 14 | dd a4 69 6e 74 65 72 72 |..f...p.|..interr|
|00000cf0| 6f 67 61 74 65 5f 72 63 | 0d 03 7a 12 ea 20 6c 69 |ogate_rc|..z.. li|
|00000d00| 6e 65 24 2c 20 69 74 65 | 6d 24 0d 03 84 16 72 75 |ne$, ite|m$....ru|
|00000d10| 63 70 5f 6d 61 69 6c 64 | 69 72 24 20 3d 20 22 22 |cp_maild|ir$ = ""|
|00000d20| 0d 03 8e 16 72 75 63 70 | 5f 6e 65 77 73 64 69 72 |....rucp|_newsdir|
|00000d30| 24 20 3d 20 22 22 0d 03 | 98 35 53 79 73 74 65 6d |$ = ""..|.5System|
|00000d40| 52 43 5f 66 69 6c 65 25 | 20 3d 20 a4 6f 70 65 6e |RC_file%| = .open|
|00000d50| 69 6e 28 72 75 63 70 5f | 64 69 72 24 20 2b 20 22 |in(rucp_|dir$ + "|
|00000d60| 2e 53 79 73 74 65 6d 52 | 43 22 29 0d 03 a2 1a e7 |.SystemR|C").....|
|00000d70| 20 53 79 73 74 65 6d 52 | 43 5f 66 69 6c 65 25 20 | SystemR|C_file% |
|00000d80| 3d 20 30 20 8c 0d 03 ac | 09 20 20 3d 20 a3 0d 03 |= 0 ....|.  = ...|
|00000d90| b6 05 cd 0d 03 c0 05 f5 | 0d 03 ca 1e 20 20 6c 69 |........|....  li|
|00000da0| 6e 65 24 20 3d 20 be 23 | 53 79 73 74 65 6d 52 43 |ne$ = .#|SystemRC|
|00000db0| 5f 66 69 6c 65 25 0d 03 | d4 23 20 20 e7 20 a4 74 |_file%..|.#  . .t|
|00000dc0| 72 69 6d 5f 63 6f 6d 6d | 65 6e 74 28 6c 69 6e 65 |rim_comm|ent(line|
|00000dd0| 24 2c 20 22 23 22 29 20 | 8c 0d 03 de 29 20 20 20 |$, "#") |....)   |
|00000de0| 20 69 74 65 6d 24 20 3d | 20 a4 73 70 6c 69 74 5f | item$ =| .split_|
|00000df0| 73 74 72 69 6e 67 28 6c | 69 6e 65 24 2c 20 22 3d |string(l|ine$, "=|
|00000e00| 22 29 0d 03 e8 17 20 20 | 20 20 c8 8e 20 a4 75 63 |")....  |  .. .uc|
|00000e10| 28 69 74 65 6d 24 29 20 | ca 0d 03 f2 15 20 20 20 |(item$) |.....   |
|00000e20| 20 20 20 c9 20 22 4e 45 | 57 53 44 49 52 22 0d 03 |   . "NE|WSDIR"..|
|00000e30| fc 35 20 20 20 20 20 20 | 20 20 72 75 63 70 5f 6d |.5      |  rucp_m|
|00000e40| 61 69 6c 64 69 72 24 20 | 3d 20 a4 73 70 6c 69 74 |aildir$ |= .split|
|00000e50| 5f 73 74 72 69 6e 67 28 | 6c 69 6e 65 24 2c 20 22 |_string(|line$, "|
|00000e60| 20 22 29 0d 04 06 15 20 | 20 20 20 20 20 c9 20 22 | ").... |     . "|
|00000e70| 4d 41 49 4c 44 49 52 22 | 0d 04 10 35 20 20 20 20 |MAILDIR"|...5    |
|00000e80| 20 20 20 20 72 75 63 70 | 5f 6e 65 77 73 64 69 72 |    rucp|_newsdir|
|00000e90| 24 20 3d 20 a4 73 70 6c | 69 74 5f 73 74 72 69 6e |$ = .spl|it_strin|
|00000ea0| 67 28 6c 69 6e 65 24 2c | 20 22 20 22 29 0d 04 1a |g(line$,| " ")...|
|00000eb0| 09 20 20 20 20 cb 0d 04 | 24 07 20 20 cd 0d 04 2e |.    ...|$.  ....|
|00000ec0| 48 fd 20 c5 23 53 79 73 | 74 65 6d 52 43 5f 66 69 |H. .#Sys|temRC_fi|
|00000ed0| 6c 65 25 20 84 20 28 28 | 72 75 63 70 5f 6d 61 69 |le% . ((|rucp_mai|
|00000ee0| 6c 64 69 72 24 20 3c 3e | 20 22 22 29 20 80 20 28 |ldir$ <>| "") . (|
|00000ef0| 72 75 63 70 5f 6e 65 77 | 73 64 69 72 24 20 3c 3e |rucp_new|sdir$ <>|
|00000f00| 20 22 22 29 29 0d 04 38 | 1f f2 63 6c 6f 73 65 5f | ""))..8|..close_|
|00000f10| 66 69 6c 65 28 53 79 73 | 74 65 6d 52 43 5f 66 69 |file(Sys|temRC_fi|
|00000f20| 6c 65 25 29 0d 04 42 1a | e7 20 72 75 63 70 5f 6d |le%)..B.|. rucp_m|
|00000f30| 61 69 6c 64 69 72 24 20 | 3d 20 22 22 20 8c 0d 04 |aildir$ |= "" ...|
|00000f40| 4c 3e 20 20 f2 65 72 72 | 6f 72 5f 6d 73 67 28 22 |L>  .err|or_msg("|
|00000f50| 6e 6f 20 65 6e 74 72 79 | 20 66 6f 72 20 4d 41 49 |no entry| for MAI|
|00000f60| 4c 44 49 52 20 69 6e 20 | 72 75 63 70 20 53 79 73 |LDIR in |rucp Sys|
|00000f70| 74 65 6d 52 43 20 66 69 | 6c 65 22 29 0d 04 56 09 |temRC fi|le")..V.|
|00000f80| 20 20 3d 20 a3 0d 04 60 | 05 cd 0d 04 6a 1a e7 20 |  = ...`|....j.. |
|00000f90| 72 75 63 70 5f 6e 65 77 | 73 64 69 72 24 20 3d 20 |rucp_new|sdir$ = |
|00000fa0| 22 22 20 8c 0d 04 74 3e | 20 20 f2 65 72 72 6f 72 |"" ...t>|  .error|
|00000fb0| 5f 6d 73 67 28 22 6e 6f | 20 65 6e 74 72 79 20 66 |_msg("no| entry f|
|00000fc0| 6f 72 20 4e 45 57 53 44 | 49 52 20 69 6e 20 72 75 |or NEWSD|IR in ru|
|00000fd0| 63 70 20 53 79 73 74 65 | 6d 52 43 20 66 69 6c 65 |cp Syste|mRC file|
|00000fe0| 22 29 0d 04 7e 09 20 20 | 3d 20 a3 0d 04 88 05 cd |")..~.  |= ......|
|00000ff0| 0d 04 92 2a 72 75 63 70 | 5f 6e 65 77 73 64 69 72 |...*rucp|_newsdir|
|00001000| 24 20 3d 20 a4 65 78 70 | 61 6e 64 28 72 75 63 70 |$ = .exp|and(rucp|
|00001010| 5f 6e 65 77 73 64 69 72 | 24 29 0d 04 9c 2a 72 75 |_newsdir|$)...*ru|
|00001020| 63 70 5f 6d 61 69 6c 64 | 69 72 24 20 3d 20 a4 65 |cp_maild|ir$ = .e|
|00001030| 78 70 61 6e 64 28 72 75 | 63 70 5f 6d 61 69 6c 64 |xpand(ru|cp_maild|
|00001040| 69 72 24 29 0d 04 a6 07 | 3d 20 b9 0d 04 b0 04 0d |ir$)....|= ......|
|00001050| 04 ba 0a dd f2 6d 61 69 | 6c 0d 04 c4 0e 69 6e 64 |.....mai|l....ind|
|00001060| 65 78 25 20 3d 20 30 0d | 04 ce 05 f5 0d 04 d8 79 |ex% = 0.|.......y|
|00001070| 20 20 c8 99 20 22 4f 53 | 5f 47 42 50 42 22 2c 20 |  .. "OS|_GBPB", |
|00001080| 31 30 2c 20 54 43 50 49 | 50 5f 6d 61 69 6c 5f 64 |10, TCPI|P_mail_d|
|00001090| 69 72 24 20 2b 20 6d 61 | 69 6c 5f 69 6e 5f 74 65 |ir$ + ma|il_in_te|
|000010a0| 78 74 5f 61 72 65 61 24 | 2c 20 47 42 50 42 5f 62 |xt_area$|, GBPB_b|
|000010b0| 75 66 25 2c 20 31 2c 20 | 69 6e 64 65 78 25 2c 20 |uf%, 1, |index%, |
|000010c0| 47 42 50 42 5f 62 75 66 | 5f 6c 65 6e 25 2c 20 22 |GBPB_buf|_len%, "|
|000010d0| 2a 22 20 b8 20 2c 2c 2c | 72 65 61 64 25 2c 20 69 |*" . ,,,|read%, i|
|000010e0| 6e 64 65 78 25 0d 04 e2 | 13 20 20 e7 20 72 65 61 |ndex%...|.  . rea|
|000010f0| 64 25 20 3d 20 31 20 8c | 0d 04 ec 1c 20 20 20 20 |d% = 1 .|....    |
|00001100| e7 20 47 42 50 42 5f 62 | 75 66 25 21 31 36 20 3d |. GBPB_b|uf%!16 =|
|00001110| 20 31 20 8c 0d 04 f6 14 | 20 20 20 20 20 20 75 73 | 1 .....|      us|
|00001120| 65 72 24 20 3d 20 22 22 | 0d 05 00 11 20 20 20 20 |er$ = ""|....    |
|00001130| 20 20 49 25 20 3d 20 32 | 30 0d 05 0a 1d 20 20 20 |  I% = 2|0....   |
|00001140| 20 20 20 c8 95 20 47 42 | 50 42 5f 62 75 66 25 3f |   .. GB|PB_buf%?|
|00001150| 49 25 20 3e 20 30 0d 05 | 14 24 20 20 20 20 20 20 |I% > 0..|.$      |
|00001160| 20 20 75 73 65 72 24 20 | 2b 3d 20 bd 28 47 42 50 |  user$ |+= .(GBP|
|00001170| 42 5f 62 75 66 25 3f 49 | 25 29 0d 05 1e 13 20 20 |B_buf%?I|%)....  |
|00001180| 20 20 20 20 20 20 49 25 | 20 2b 3d 20 31 0d 05 28 |      I%| += 1..(|
|00001190| 0b 20 20 20 20 20 20 ce | 0d 05 32 40 20 20 20 20 |.      .|..2@    |
|000011a0| 20 20 f2 69 6e 66 6f 5f | 6d 73 67 28 22 50 72 6f |  .info_|msg("Pro|
|000011b0| 63 65 73 73 69 6e 67 20 | 6d 61 69 6c 20 66 6f 72 |cessing |mail for|
|000011c0| 20 75 73 65 72 20 60 22 | 20 2b 20 75 73 65 72 24 | user `"| + user$|
|000011d0| 20 2b 20 22 27 2e 22 29 | 0d 05 3c 17 20 20 20 20 | + "'.")|..<.    |
|000011e0| 20 20 f2 70 72 6f 63 65 | 73 73 5f 6d 61 69 6c 0d |  .proce|ss_mail.|
|000011f0| 05 46 09 20 20 20 20 cd | 0d 05 50 07 20 20 cd 0d |.F.    .|..P.  ..|
|00001200| 05 5a 11 fd 20 69 6e 64 | 65 78 25 20 3d 20 2d 31 |.Z.. ind|ex% = -1|
|00001210| 0d 05 64 05 e1 0d 05 6e | 04 0d 05 78 12 dd f2 70 |..d....n|...x...p|
|00001220| 72 6f 63 65 73 73 5f 6d | 61 69 6c 0d 05 82 1a 4f |rocess_m|ail....O|
|00001230| 4b 25 20 3d 20 a4 6f 70 | 65 6e 5f 6d 61 69 6c 5f |K% = .op|en_mail_|
|00001240| 66 69 6c 65 73 0d 05 8c | 0b e7 20 4f 4b 25 20 8c |files...|.. OK% .|
|00001250| 0d 05 96 2d 20 20 21 6d | 63 64 5f 69 6e 70 75 74 |...-  !m|cd_input|
|00001260| 5f 66 69 6c 65 5f 68 61 | 6e 64 6c 65 25 20 3d 20 |_file_ha|ndle% = |
|00001270| 6d 61 69 6c 5f 69 6e 5f | 66 69 6c 65 25 0d 05 a0 |mail_in_|file%...|
|00001280| 2f 20 20 21 6d 63 64 5f | 6f 75 74 70 75 74 5f 66 |/  !mcd_|output_f|
|00001290| 69 6c 65 5f 68 61 6e 64 | 6c 65 25 20 3d 20 6d 61 |ile_hand|le% = ma|
|000012a0| 69 6c 5f 6f 75 74 5f 66 | 69 6c 65 25 0d 05 aa 19 |il_out_f|ile%....|
|000012b0| 20 20 d6 20 6d 63 5f 74 | 72 61 6e 73 66 65 72 5f |  . mc_t|ransfer_|
|000012c0| 6d 61 69 6c 25 0d 05 b4 | 19 20 20 4f 4b 25 20 3d |mail%...|.  OK% =|
|000012d0| 20 ac 20 21 6d 63 64 5f | 61 62 6f 72 74 25 0d 05 | . !mcd_|abort%..|
|000012e0| be 19 20 20 f4 20 50 52 | 4f 43 74 72 61 6e 73 66 |..  . PR|OCtransf|
|000012f0| 65 72 5f 6d 61 69 6c 0d | 05 c8 05 cd 0d 05 d2 15 |er_mail.|........|
|00001300| f2 63 6c 6f 73 65 5f 6d | 61 69 6c 5f 66 69 6c 65 |.close_m|ail_file|
|00001310| 73 0d 05 dc 0b e7 20 4f | 4b 25 20 8c 0d 05 e6 5d |s..... O|K% ....]|
|00001320| 20 20 e7 20 a4 64 65 6c | 65 74 65 5f 66 69 6c 65 |  . .del|ete_file|
|00001330| 28 54 43 50 49 50 5f 6d | 61 69 6c 5f 64 69 72 24 |(TCPIP_m|ail_dir$|
|00001340| 20 2b 20 6d 61 69 6c 5f | 69 6e 5f 74 65 78 74 5f | + mail_|in_text_|
|00001350| 61 72 65 61 24 20 2b 20 | 22 2e 22 20 2b 20 75 73 |area$ + |"." + us|
|00001360| 65 72 24 2c 20 22 54 43 | 50 49 50 20 6d 61 69 6c |er$, "TC|PIP mail|
|00001370| 20 66 69 6c 65 22 29 20 | 8c 0d 05 f0 13 20 20 20 | file") |.....   |
|00001380| 20 69 6e 64 65 78 25 20 | 2d 3d 20 31 0d 05 fa 07 | index% |-= 1....|
|00001390| 20 20 cd 0d 06 04 05 cd | 0d 06 0e 63 64 75 6d 6d |  ......|...cdumm|
|000013a0| 79 25 20 3d 20 a4 75 6e | 6c 6f 63 6b 5f 54 43 50 |y% = .un|lock_TCP|
|000013b0| 49 50 5f 6d 61 69 6c 5f | 66 69 6c 65 28 54 43 50 |IP_mail_|file(TCP|
|000013c0| 49 50 5f 6d 61 69 6c 5f | 64 69 72 24 20 2b 20 6d |IP_mail_|dir$ + m|
|000013d0| 61 69 6c 5f 69 6e 5f 6c | 6f 63 6b 5f 70 61 74 68 |ail_in_l|ock_path|
|000013e0| 24 20 2b 20 75 73 65 72 | 24 2c 20 6d 61 69 6c 5f |$ + user|$, mail_|
|000013f0| 6c 6f 63 6b 5f 66 69 6c | 65 25 29 0d 06 18 05 e1 |lock_fil|e%).....|
|00001400| 0d 06 22 04 0d 06 2c 15 | dd a4 6f 70 65 6e 5f 6d |.."...,.|..open_m|
|00001410| 61 69 6c 5f 66 69 6c 65 | 73 0d 06 36 59 6d 61 69 |ail_file|s..6Ymai|
|00001420| 6c 5f 6c 6f 63 6b 5f 66 | 69 6c 65 25 20 3d 20 a4 |l_lock_f|ile% = .|
|00001430| 6c 6f 63 6b 5f 54 43 50 | 49 50 5f 6d 61 69 6c 5f |lock_TCP|IP_mail_|
|00001440| 66 69 6c 65 28 54 43 50 | 49 50 5f 6d 61 69 6c 5f |file(TCP|IP_mail_|
|00001450| 64 69 72 24 20 2b 20 6d | 61 69 6c 5f 69 6e 5f 6c |dir$ + m|ail_in_l|
|00001460| 6f 63 6b 5f 70 61 74 68 | 24 20 2b 20 75 73 65 72 |ock_path|$ + user|
|00001470| 24 29 0d 06 40 1b e7 20 | 6d 61 69 6c 5f 6c 6f 63 |$)..@.. |mail_loc|
|00001480| 6b 5f 66 69 6c 65 25 20 | 3d 20 30 20 8c 0d 06 4a |k_file% |= 0 ...J|
|00001490| 4a 20 20 f2 69 6e 66 6f | 5f 6d 73 67 28 22 4d 61 |J  .info|_msg("Ma|
|000014a0| 69 6c 20 66 69 6c 65 20 | 66 6f 72 20 75 73 65 72 |il file |for user|
|000014b0| 20 60 22 20 2b 20 75 73 | 65 72 24 20 2b 20 22 27 | `" + us|er$ + "'|
|000014c0| 20 69 73 20 63 75 72 72 | 65 6e 74 6c 79 20 6c 6f | is curr|ently lo|
|000014d0| 63 6b 65 64 2e 22 29 0d | 06 54 09 20 20 3d 20 a3 |cked.").|.T.  = .|
|000014e0| 0d 06 5e 05 cd 0d 06 68 | 4f 6d 61 69 6c 5f 69 6e |..^....h|Omail_in|
|000014f0| 5f 66 69 6c 65 25 20 3d | 20 a4 6f 70 65 6e 69 6e |_file% =| .openin|
|00001500| 28 54 43 50 49 50 5f 6d | 61 69 6c 5f 64 69 72 24 |(TCPIP_m|ail_dir$|
|00001510| 20 2b 20 6d 61 69 6c 5f | 69 6e 5f 74 65 78 74 5f | + mail_|in_text_|
|00001520| 61 72 65 61 24 20 2b 20 | 22 2e 22 20 2b 20 75 73 |area$ + |"." + us|
|00001530| 65 72 24 29 0d 06 72 19 | e7 20 6d 61 69 6c 5f 69 |er$)..r.|. mail_i|
|00001540| 6e 5f 66 69 6c 65 25 20 | 3d 20 30 20 8c 0d 06 7c |n_file% |= 0 ...||
|00001550| 65 20 20 f2 65 72 72 6f | 72 5f 6d 73 67 28 22 63 |e  .erro|r_msg("c|
|00001560| 61 6e 6e 6f 74 20 6f 70 | 65 6e 20 54 43 50 49 50 |annot op|en TCPIP|
|00001570| 20 6d 61 69 6c 20 66 69 | 6c 65 20 22 20 2b 20 54 | mail fi|le " + T|
|00001580| 43 50 49 50 5f 6d 61 69 | 6c 5f 64 69 72 24 20 2b |CPIP_mai|l_dir$ +|
|00001590| 20 6d 61 69 6c 5f 69 6e | 5f 74 65 78 74 5f 61 72 | mail_in|_text_ar|
|000015a0| 65 61 24 20 2b 20 22 2e | 22 20 2b 20 75 73 65 72 |ea$ + ".|" + user|
|000015b0| 24 29 0d 06 86 09 20 20 | 3d 20 a3 0d 06 90 05 cd |$)....  |= ......|
|000015c0| 0d 06 9a 21 20 20 e7 20 | a4 75 63 28 75 73 65 72 |...!  . |.uc(user|
|000015d0| 24 29 20 3d 20 22 50 4f | 53 54 4d 41 53 54 22 20 |$) = "PO|STMAST" |
|000015e0| 8c 0d 06 a4 1f 20 20 20 | 20 6f 75 74 75 73 65 72 |.....   | outuser|
|000015f0| 24 20 3d 20 22 70 6f 73 | 74 6d 61 73 74 65 72 22 |$ = "pos|tmaster"|
|00001600| 0d 06 ae 07 20 20 cc 0d | 06 b8 18 20 20 20 20 6f |....  ..|...    o|
|00001610| 75 74 75 73 65 72 24 20 | 3d 20 75 73 65 72 24 0d |utuser$ |= user$.|
|00001620| 06 c2 07 20 20 cd 0d 06 | cc 49 20 20 6d 61 69 6c |...  ...|.I  mail|
|00001630| 5f 6f 75 74 5f 66 69 6c | 65 25 20 3d 20 a4 6f 70 |_out_fil|e% = .op|
|00001640| 65 6e 61 70 70 65 6e 64 | 28 72 75 63 70 5f 64 69 |enappend|(rucp_di|
|00001650| 72 24 20 2b 20 6d 61 69 | 6c 5f 6f 75 74 5f 70 61 |r$ + mai|l_out_pa|
|00001660| 74 68 24 20 2b 20 6f 75 | 74 75 73 65 72 24 29 0d |th$ + ou|tuser$).|
|00001670| 06 d6 1c 20 20 e7 20 6d | 61 69 6c 5f 6f 75 74 5f |...  . m|ail_out_|
|00001680| 66 69 6c 65 25 20 3d 20 | 30 20 8c 0d 06 e0 62 20 |file% = |0 ....b |
|00001690| 20 20 20 f2 65 72 72 6f | 72 5f 6d 73 67 28 22 63 |   .erro|r_msg("c|
|000016a0| 61 6e 6e 6f 74 20 63 72 | 65 61 74 65 2f 61 70 70 |annot cr|eate/app|
|000016b0| 65 6e 64 20 75 75 63 70 | 20 6d 61 69 6c 20 66 69 |end uucp| mail fi|
|000016c0| 6c 65 20 22 20 2b 20 72 | 75 63 70 5f 64 69 72 24 |le " + r|ucp_dir$|
|000016d0| 20 2b 20 6d 61 69 6c 5f | 6f 75 74 5f 70 61 74 68 | + mail_|out_path|
|000016e0| 24 20 2b 20 6f 75 74 75 | 73 65 72 24 29 0d 06 ea |$ + outu|ser$)...|
|000016f0| 0b 20 20 20 20 3d 20 a3 | 0d 06 f4 07 20 20 cd 0d |.    = .|....  ..|
|00001700| 06 fe 40 20 20 f2 6d 61 | 6b 65 5f 66 69 6c 65 74 |..@  .ma|ke_filet|
|00001710| 79 70 65 5f 74 65 78 74 | 28 72 75 63 70 5f 64 69 |ype_text|(rucp_di|
|00001720| 72 24 20 2b 20 6d 61 69 | 6c 5f 6f 75 74 5f 70 61 |r$ + mai|l_out_pa|
|00001730| 74 68 24 20 2b 20 6f 75 | 74 75 73 65 72 24 29 0d |th$ + ou|tuser$).|
|00001740| 07 08 05 cd 0d 07 12 07 | 3d 20 b9 0d 07 1c 04 0d |........|= ......|
|00001750| 07 26 13 dd f2 74 72 61 | 6e 73 66 65 72 5f 6d 61 |.&...tra|nsfer_ma|
|00001760| 69 6c 0d 07 30 1b 6c 69 | 6e 65 24 20 3d 20 be 23 |il..0.li|ne$ = .#|
|00001770| 6d 61 69 6c 5f 69 6e 5f | 66 69 6c 65 25 0d 07 3a |mail_in_|file%..:|
|00001780| 05 f5 0d 07 44 1c 20 20 | d5 23 6d 61 69 6c 5f 6f |....D.  |.#mail_o|
|00001790| 75 74 5f 66 69 6c 65 25 | 2c 20 bd 28 31 29 0d 07 |ut_file%|, .(1)..|
|000017a0| 4e 07 20 20 f5 0d 07 58 | 34 20 20 20 20 e7 20 c0 |N.  ...X|4    . .|
|000017b0| 6c 69 6e 65 24 2c 20 36 | 29 20 3d 20 22 3e 46 72 |line$, 6|) = ">Fr|
|000017c0| 6f 6d 20 22 20 8c 20 6c | 69 6e 65 24 20 3d 20 c1 |om " . l|ine$ = .|
|000017d0| 6c 69 6e 65 24 2c 20 32 | 29 0d 07 62 1f 20 20 20 |line$, 2|)..b.   |
|000017e0| 20 d5 23 6d 61 69 6c 5f | 6f 75 74 5f 66 69 6c 65 | .#mail_|out_file|
|000017f0| 25 2c 20 6c 69 6e 65 24 | 0d 07 6c 1f 20 20 20 20 |%, line$|..l.    |
|00001800| 6c 69 6e 65 24 20 3d 20 | be 23 6d 61 69 6c 5f 69 |line$ = |.#mail_i|
|00001810| 6e 5f 66 69 6c 65 25 0d | 07 76 2d 20 20 fd 20 c5 |n_file%.|.v-  . .|
|00001820| 23 6d 61 69 6c 5f 69 6e | 5f 66 69 6c 65 25 20 84 |#mail_in|_file% .|
|00001830| 20 c0 6c 69 6e 65 24 2c | 35 29 20 3d 20 22 46 72 | .line$,|5) = "Fr|
|00001840| 6f 6d 20 22 0d 07 80 15 | fd 20 c5 23 6d 61 69 6c |om "....|. .#mail|
|00001850| 5f 69 6e 5f 66 69 6c 65 | 25 0d 07 8a 1b d5 23 6d |_in_file|%.....#m|
|00001860| 61 69 6c 5f 6f 75 74 5f | 66 69 6c 65 25 2c 20 6c |ail_out_|file%, l|
|00001870| 69 6e 65 24 0d 07 94 05 | e1 0d 07 9e 04 0d 07 a8 |ine$....|........|
|00001880| 16 dd f2 63 6c 6f 73 65 | 5f 6d 61 69 6c 5f 66 69 |...close|_mail_fi|
|00001890| 6c 65 73 0d 07 b2 1e f2 | 63 6c 6f 73 65 5f 66 69 |les.....|close_fi|
|000018a0| 6c 65 28 6d 61 69 6c 5f | 69 6e 5f 66 69 6c 65 25 |le(mail_|in_file%|
|000018b0| 29 0d 07 bc 1f f2 63 6c | 6f 73 65 5f 66 69 6c 65 |).....cl|ose_file|
|000018c0| 28 6d 61 69 6c 5f 6f 75 | 74 5f 66 69 6c 65 25 29 |(mail_ou|t_file%)|
|000018d0| 0d 07 c6 05 e1 0d 07 d0 | 04 0d 07 da 0a dd f2 6e |........|.......n|
|000018e0| 65 77 73 0d 07 e4 0e 61 | 62 6f 72 74 25 20 3d 20 |ews....a|bort% = |
|000018f0| a3 0d 07 ee 15 61 62 62 | 72 24 20 3d 20 22 75 6e |.....abb|r$ = "un|
|00001900| 6b 6e 6f 77 6e 22 0d 07 | f8 0e 69 6e 64 65 78 25 |known"..|..index%|
|00001910| 20 3d 20 30 0d 08 02 05 | f5 0d 08 0c 6f 20 20 c8 | = 0....|....o  .|
|00001920| 99 20 22 4f 53 5f 47 42 | 50 42 22 2c 20 39 2c 20 |. "OS_GB|PB", 9, |
|00001930| 54 43 50 49 50 5f 6d 61 | 69 6c 5f 64 69 72 24 2c |TCPIP_ma|il_dir$,|
|00001940| 20 47 42 50 42 5f 62 75 | 66 25 2c 20 31 2c 20 69 | GBPB_bu|f%, 1, i|
|00001950| 6e 64 65 78 25 2c 20 47 | 42 50 42 5f 62 75 66 5f |ndex%, G|BPB_buf_|
|00001960| 6c 65 6e 25 2c 20 6e 65 | 77 73 5f 77 6f 72 6b 5f |len%, ne|ws_work_|
|00001970| 6e 61 6d 65 24 20 b8 20 | 2c 2c 2c 72 65 61 64 25 |name$ . |,,,read%|
|00001980| 2c 20 69 6e 64 65 78 25 | 0d 08 16 21 fd 20 28 72 |, index%|...!. (r|
|00001990| 65 61 64 25 20 3d 20 31 | 29 20 84 20 28 69 6e 64 |ead% = 1|) . (ind|
|000019a0| 65 78 25 20 3d 20 2d 31 | 29 0d 08 20 11 e7 20 72 |ex% = -1|).. .. r|
|000019b0| 65 61 64 25 20 3d 20 31 | 20 8c 0d 08 2a 80 20 20 |ead% = 1| ...*.  |
|000019c0| f1 20 22 4f 6c 64 20 72 | 75 63 70 20 77 6f 72 6b |. "Old r|ucp work|
|000019d0| 20 66 69 6c 65 20 22 3b | 20 54 43 50 49 50 5f 6d | file ";| TCPIP_m|
|000019e0| 61 69 6c 5f 64 69 72 24 | 3b 20 22 2e 22 3b 20 6e |ail_dir$|; "."; n|
|000019f0| 65 77 73 5f 77 6f 72 6b | 5f 6e 61 6d 65 24 3b 20 |ews_work|_name$; |
|00001a00| 22 2e 20 20 41 62 6f 72 | 74 20 6e 65 77 73 20 73 |".  Abor|t news s|
|00001a10| 63 61 6e 20 28 41 29 2c | 20 44 65 6c 65 74 65 20 |can (A),| Delete |
|00001a20| 28 44 29 20 6f 72 20 50 | 72 6f 63 65 73 73 20 28 |(D) or P|rocess (|
|00001a30| 50 29 20 5b 41 5d 3a 20 | 22 3b 0d 08 34 0c 20 20 |P) [A]: |";..4.  |
|00001a40| 43 24 20 3d 20 be 0d 08 | 3e 25 20 20 e7 20 a7 22 |C$ = ...|>%  . ."|
|00001a50| 41 61 44 64 50 70 22 2c | 20 43 24 29 20 3d 20 30 |AaDdPp",| C$) = 0|
|00001a60| 20 8c 20 43 24 20 3d 20 | 22 41 22 0d 08 48 0a 20 | . C$ = |"A"..H. |
|00001a70| 20 f1 20 43 24 0d 08 52 | 19 20 20 c8 8e 20 a7 22 | . C$..R|.  .. ."|
|00001a80| 41 61 44 64 50 70 22 2c | 20 43 24 29 20 ca 0d 08 |AaDdPp",| C$) ...|
|00001a90| 5c 19 20 20 20 20 c9 20 | 31 2c 32 3a 20 61 62 6f |\.    . |1,2: abo|
|00001aa0| 72 74 25 20 3d 20 b9 0d | 08 66 5f 20 20 20 20 c9 |rt% = ..|.f_    .|
|00001ab0| 20 33 2c 34 3a 20 64 75 | 6d 6d 79 25 20 3d 20 a4 | 3,4: du|mmy% = .|
|00001ac0| 64 65 6c 65 74 65 5f 66 | 69 6c 65 28 54 43 50 49 |delete_f|ile(TCPI|
|00001ad0| 50 5f 6d 61 69 6c 5f 64 | 69 72 24 20 2b 20 22 2e |P_mail_d|ir$ + ".|
|00001ae0| 22 20 2b 20 6e 65 77 73 | 5f 77 6f 72 6b 5f 6e 61 |" + news|_work_na|
|00001af0| 6d 65 24 2c 20 22 6e 65 | 77 73 20 77 6f 72 6b 20 |me$, "ne|ws work |
|00001b00| 66 69 6c 65 22 29 0d 08 | 70 1c 20 20 20 20 c9 20 |file")..|p.    . |
|00001b10| 35 2c 36 3a 20 f2 70 72 | 6f 63 65 73 73 5f 6e 65 |5,6: .pr|ocess_ne|
|00001b20| 77 73 0d 08 7a 07 20 20 | cb 0d 08 84 05 cd 0d 08 |ws..z.  |........|
|00001b30| 8e 10 e7 20 ac 20 61 62 | 6f 72 74 25 20 8c 0d 08 |... . ab|ort% ...|
|00001b40| 98 10 20 20 69 6e 64 65 | 78 25 20 3d 20 30 0d 08 |..  inde|x% = 0..|
|00001b50| a2 07 20 20 f5 0d 08 ac | 69 20 20 20 20 c8 99 20 |..  ....|i    .. |
|00001b60| 22 4f 53 5f 47 42 50 42 | 22 2c 20 39 2c 20 54 43 |"OS_GBPB|", 9, TC|
|00001b70| 50 49 50 5f 6d 61 69 6c | 5f 64 69 72 24 2c 20 47 |PIP_mail|_dir$, G|
|00001b80| 42 50 42 5f 62 75 66 25 | 2c 20 31 2c 20 69 6e 64 |BPB_buf%|, 1, ind|
|00001b90| 65 78 25 2c 20 47 42 50 | 42 5f 62 75 66 5f 6c 65 |ex%, GBP|B_buf_le|
|00001ba0| 6e 25 2c 20 22 2a 6e 65 | 77 73 22 20 b8 20 2c 2c |n%, "*ne|ws" . ,,|
|00001bb0| 2c 72 65 61 64 25 2c 20 | 69 6e 64 65 78 25 0d 08 |,read%, |index%..|
|00001bc0| b6 15 20 20 20 20 e7 20 | 72 65 61 64 25 20 3d 20 |..    . |read% = |
|00001bd0| 31 20 8c 0d 08 c0 14 20 | 20 20 20 20 20 61 62 62 |1 ..... |     abb|
|00001be0| 72 24 20 3d 20 22 22 0d | 08 ca 10 20 20 20 20 20 |r$ = "".|...     |
|00001bf0| 20 49 25 20 3d 20 30 0d | 08 d4 1d 20 20 20 20 20 | I% = 0.|...     |
|00001c00| 20 c8 95 20 47 42 50 42 | 5f 62 75 66 25 3f 49 25 | .. GBPB|_buf%?I%|
|00001c10| 20 3e 20 30 0d 08 de 24 | 20 20 20 20 20 20 20 20 | > 0...$|        |
|00001c20| 61 62 62 72 24 20 2b 3d | 20 bd 28 47 42 50 42 5f |abbr$ +=| .(GBPB_|
|00001c30| 62 75 66 25 3f 49 25 29 | 0d 08 e8 13 20 20 20 20 |buf%?I%)|....    |
|00001c40| 20 20 20 20 49 25 20 2b | 3d 20 31 0d 08 f2 0b 20 |    I% +|= 1.... |
|00001c50| 20 20 20 20 20 ce 0d 08 | fc 70 20 20 20 20 20 20 |     ...|.p      |
|00001c60| e7 20 a4 6d 6f 76 65 5f | 66 69 6c 65 28 54 43 50 |. .move_|file(TCP|
|00001c70| 49 50 5f 6d 61 69 6c 5f | 64 69 72 24 20 2b 20 22 |IP_mail_|dir$ + "|
|00001c80| 2e 22 20 2b 20 61 62 62 | 72 24 2c 20 54 43 50 49 |." + abb|r$, TCPI|
|00001c90| 50 5f 6d 61 69 6c 5f 64 | 69 72 24 20 2b 20 22 2e |P_mail_d|ir$ + ".|
|00001ca0| 22 20 2b 20 6e 65 77 73 | 5f 77 6f 72 6b 5f 6e 61 |" + news|_work_na|
|00001cb0| 6d 65 24 2c 20 22 6e 65 | 77 73 20 66 69 6c 65 22 |me$, "ne|ws file"|
|00001cc0| 2c 20 a3 29 20 8c 0d 09 | 06 4c 20 20 20 20 20 20 |, .) ...|.L      |
|00001cd0| 20 20 f2 69 6e 66 6f 5f | 6d 73 67 28 22 50 72 6f |  .info_|msg("Pro|
|00001ce0| 63 65 73 73 69 6e 67 20 | 6e 65 77 73 20 69 6e 20 |cessing |news in |
|00001cf0| 22 20 2b 20 54 43 50 49 | 50 5f 6d 61 69 6c 5f 64 |" + TCPI|P_mail_d|
|00001d00| 69 72 24 20 2b 20 22 2e | 22 20 2b 20 61 62 62 72 |ir$ + ".|" + abbr|
|00001d10| 24 29 0d 09 10 19 20 20 | 20 20 20 20 20 20 f2 70 |$)....  |      .p|
|00001d20| 72 6f 63 65 73 73 5f 6e | 65 77 73 0d 09 1a 0b 20 |rocess_n|ews.... |
|00001d30| 20 20 20 20 20 cc 0d 09 | 24 6d 20 20 20 20 20 20 |     ...|$m      |
|00001d40| 20 20 f2 69 6e 66 6f 5f | 6d 73 67 28 22 43 61 6e |  .info_|msg("Can|
|00001d50| 6e 6f 74 20 61 63 63 65 | 73 73 20 6e 65 77 73 20 |not acce|ss news |
|00001d60| 66 69 6c 65 20 22 20 2b | 20 54 43 50 49 50 5f 6d |file " +| TCPIP_m|
|00001d70| 61 69 6c 5f 64 69 72 24 | 20 2b 20 22 2e 22 20 2b |ail_dir$| + "." +|
|00001d80| 20 61 62 62 72 24 20 2b | 20 22 20 2d 20 70 65 72 | abbr$ +| " - per|
|00001d90| 68 61 70 73 20 69 74 20 | 69 73 20 69 6e 20 75 73 |haps it |is in us|
|00001da0| 65 22 29 0d 09 2e 0b 20 | 20 20 20 20 20 cd 0d 09 |e").... |     ...|
|00001db0| 38 09 20 20 20 20 cd 0d | 09 42 13 20 20 fd 20 69 |8.    ..|.B.  . i|
|00001dc0| 6e 64 65 78 25 20 3d 20 | 2d 31 0d 09 4c 05 cd 0d |ndex% = |-1..L...|
|00001dd0| 09 56 15 61 62 62 72 24 | 20 3d 20 22 75 6e 6b 6e |.V.abbr$| = "unkn|
|00001de0| 6f 77 6e 22 0d 09 60 0e | 69 6e 64 65 78 25 20 3d |own"..`.|index% =|
|00001df0| 20 30 0d 09 6a 05 f5 0d | 09 74 7b 20 20 c8 99 20 | 0..j...|.t{  .. |
|00001e00| 22 4f 53 5f 47 42 50 42 | 22 2c 20 39 2c 20 54 43 |"OS_GBPB|", 9, TC|
|00001e10| 50 49 50 5f 6d 61 69 6c | 5f 64 69 72 24 20 2b 20 |PIP_mail|_dir$ + |
|00001e20| 22 2e 66 6f 6c 64 65 72 | 22 2c 20 47 42 50 42 5f |".folder|", GBPB_|
|00001e30| 62 75 66 25 2c 20 31 2c | 20 69 6e 64 65 78 25 2c |buf%, 1,| index%,|
|00001e40| 20 47 42 50 42 5f 62 75 | 66 5f 6c 65 6e 25 2c 20 | GBPB_bu|f_len%, |
|00001e50| 6e 65 77 73 5f 77 6f 72 | 6b 5f 6e 61 6d 65 24 20 |news_wor|k_name$ |
|00001e60| b8 20 2c 2c 2c 72 65 61 | 64 25 2c 20 69 6e 64 65 |. ,,,rea|d%, inde|
|00001e70| 78 25 0d 09 7e 21 fd 20 | 28 72 65 61 64 25 20 3d |x%..~!. |(read% =|
|00001e80| 20 31 29 20 84 20 28 69 | 6e 64 65 78 25 20 3d 20 | 1) . (i|ndex% = |
|00001e90| 2d 31 29 0d 09 88 11 e7 | 20 72 65 61 64 25 20 3d |-1).....| read% =|
|00001ea0| 20 31 20 8c 0d 09 92 87 | 20 20 f1 20 22 4f 6c 64 | 1 .....|  . "Old|
|00001eb0| 20 72 75 63 70 20 77 6f | 72 6b 20 66 69 6c 65 20 | rucp wo|rk file |
|00001ec0| 22 3b 20 54 43 50 49 50 | 5f 6d 61 69 6c 5f 64 69 |"; TCPIP|_mail_di|
|00001ed0| 72 24 3b 20 22 2e 66 6f | 6c 64 65 72 2e 22 3b 20 |r$; ".fo|lder."; |
|00001ee0| 6e 65 77 73 5f 77 6f 72 | 6b 5f 6e 61 6d 65 24 3b |news_wor|k_name$;|
|00001ef0| 20 22 2e 20 20 41 62 6f | 72 74 20 6e 65 77 73 20 | ".  Abo|rt news |
|00001f00| 73 63 61 6e 20 28 41 29 | 2c 20 44 65 6c 65 74 65 |scan (A)|, Delete|
|00001f10| 20 28 44 29 20 6f 72 20 | 50 72 6f 63 65 73 73 20 | (D) or |Process |
|00001f20| 28 50 29 20 5b 41 5d 3a | 20 22 3b 0d 09 9c 0c 20 |(P) [A]:| ";.... |
|00001f30| 20 43 24 20 3d 20 be 0d | 09 a6 25 20 20 e7 20 a7 | C$ = ..|..%  . .|
|00001f40| 22 41 61 44 64 50 70 22 | 2c 20 43 24 29 20 3d 20 |"AaDdPp"|, C$) = |
|00001f50| 30 20 8c 20 43 24 20 3d | 20 22 41 22 0d 09 b0 0a |0 . C$ =| "A"....|
|00001f60| 20 20 f1 20 43 24 0d 09 | ba 19 20 20 c8 8e 20 a7 |  . C$..|..  .. .|
|00001f70| 22 41 61 44 64 50 70 22 | 2c 20 43 24 29 20 ca 0d |"AaDdPp"|, C$) ..|
|00001f80| 09 c4 19 20 20 20 20 c9 | 20 31 2c 32 3a 20 61 62 |...    .| 1,2: ab|
|00001f90| 6f 72 74 25 20 3d 20 b9 | 0d 09 ce 66 20 20 20 20 |ort% = .|...f    |
|00001fa0| c9 20 33 2c 34 3a 20 64 | 75 6d 6d 79 25 20 3d 20 |. 3,4: d|ummy% = |
|00001fb0| f2 64 65 6c 65 74 65 5f | 66 69 6c 65 28 54 43 50 |.delete_|file(TCP|
|00001fc0| 49 50 5f 6d 61 69 6c 5f | 64 69 72 24 20 2b 20 22 |IP_mail_|dir$ + "|
|00001fd0| 2e 66 6f 6c 64 65 72 2e | 22 20 2b 20 6e 65 77 73 |.folder.|" + news|
|00001fe0| 5f 77 6f 72 6b 5f 6e 61 | 6d 65 24 2c 20 22 6e 65 |_work_na|me$, "ne|
|00001ff0| 77 73 20 6d 61 69 6c 20 | 66 69 6c 65 22 29 0d 09 |ws mail |file")..|
|00002000| d8 1c 20 20 20 20 c9 20 | 35 2c 36 3a 20 f2 70 72 |..    . |5,6: .pr|
|00002010| 6f 63 65 73 73 5f 6e 65 | 77 73 0d 09 e2 07 20 20 |ocess_ne|ws....  |
|00002020| cb 0d 09 ec 05 cd 0d 09 | f6 10 e7 20 ac 20 61 62 |........|... . ab|
|00002030| 6f 72 74 25 20 8c 0d 0a | 00 10 20 20 69 6e 64 65 |ort% ...|..  inde|
|00002040| 78 25 20 3d 20 30 0d 0a | 0a 07 20 20 f5 0d 0a 14 |x% = 0..|..  ....|
|00002050| 75 20 20 20 20 c8 99 20 | 22 4f 53 5f 47 42 50 42 |u    .. |"OS_GBPB|
|00002060| 22 2c 20 39 2c 20 54 43 | 50 49 50 5f 6d 61 69 6c |", 9, TC|PIP_mail|
|00002070| 5f 64 69 72 24 20 2b 20 | 22 2e 66 6f 6c 64 65 72 |_dir$ + |".folder|
|00002080| 22 2c 20 47 42 50 42 5f | 62 75 66 25 2c 20 31 2c |", GBPB_|buf%, 1,|
|00002090| 20 69 6e 64 65 78 25 2c | 20 47 42 50 42 5f 62 75 | index%,| GBPB_bu|
|000020a0| 66 5f 6c 65 6e 25 2c 20 | 22 2a 6e 65 77 73 22 20 |f_len%, |"*news" |
|000020b0| b8 20 2c 2c 2c 72 65 61 | 64 25 2c 20 69 6e 64 65 |. ,,,rea|d%, inde|
|000020c0| 78 25 0d 0a 1e 15 20 20 | 20 20 e7 20 72 65 61 64 |x%....  |  . read|
|000020d0| 25 20 3d 20 31 20 8c 0d | 0a 28 14 20 20 20 20 20 |% = 1 ..|.(.     |
|000020e0| 20 61 62 62 72 24 20 3d | 20 22 22 0d 0a 32 10 20 | abbr$ =| ""..2. |
|000020f0| 20 20 20 20 20 49 25 20 | 3d 20 30 0d 0a 3c 1d 20 |     I% |= 0..<. |
|00002100| 20 20 20 20 20 c8 95 20 | 47 42 50 42 5f 62 75 66 |     .. |GBPB_buf|
|00002110| 25 3f 49 25 20 3e 20 30 | 0d 0a 46 24 20 20 20 20 |%?I% > 0|..F$    |
|00002120| 20 20 20 20 61 62 62 72 | 24 20 2b 3d 20 bd 28 47 |    abbr|$ += .(G|
|00002130| 42 50 42 5f 62 75 66 25 | 3f 49 25 29 0d 0a 50 13 |BPB_buf%|?I%)..P.|
|00002140| 20 20 20 20 20 20 20 20 | 49 25 20 2b 3d 20 31 0d |        |I% += 1.|
|00002150| 0a 5a 0b 20 20 20 20 20 | 20 ce 0d 0a 64 77 20 20 |.Z.     | ...dw  |
|00002160| 20 20 20 20 e7 20 a4 6d | 6f 76 65 5f 66 69 6c 65 |    . .m|ove_file|
|00002170| 28 54 43 50 49 50 5f 6d | 61 69 6c 5f 64 69 72 24 |(TCPIP_m|ail_dir$|
|00002180| 20 2b 20 22 2e 66 6f 6c | 64 65 72 2e 22 20 2b 20 | + ".fol|der." + |
|00002190| 61 62 62 72 24 2c 20 54 | 43 50 49 50 5f 6d 61 69 |abbr$, T|CPIP_mai|
|000021a0| 6c 5f 64 69 72 24 20 2b | 20 22 2e 22 20 2b 20 6e |l_dir$ +| "." + n|
|000021b0| 65 77 73 5f 77 6f 72 6b | 5f 6e 61 6d 65 24 2c 20 |ews_work|_name$, |
|000021c0| 22 6e 65 77 73 20 66 69 | 6c 65 22 2c 20 a3 29 20 |"news fi|le", .) |
|000021d0| 8c 0d 0a 6e 53 20 20 20 | 20 20 20 20 20 f2 69 6e |...nS   |     .in|
|000021e0| 66 6f 5f 6d 73 67 28 22 | 50 72 6f 63 65 73 73 69 |fo_msg("|Processi|
|000021f0| 6e 67 20 6e 65 77 73 20 | 69 6e 20 22 20 2b 20 54 |ng news |in " + T|
|00002200| 43 50 49 50 5f 6d 61 69 | 6c 5f 64 69 72 24 20 2b |CPIP_mai|l_dir$ +|
|00002210| 20 22 2e 66 6f 6c 64 65 | 72 2e 22 20 2b 20 61 62 | ".folde|r." + ab|
|00002220| 62 72 24 29 0d 0a 78 19 | 20 20 20 20 20 20 20 20 |br$)..x.|        |
|00002230| f2 70 72 6f 63 65 73 73 | 5f 6e 65 77 73 0d 0a 82 |.process|_news...|
|00002240| 0b 20 20 20 20 20 20 cc | 0d 0a 8c 6d 20 20 20 20 |.      .|...m    |
|00002250| 20 20 20 20 f2 69 6e 66 | 6f 5f 6d 73 67 28 22 43 |    .inf|o_msg("C|
|00002260| 61 6e 6e 6f 74 20 61 63 | 63 65 73 73 20 6e 65 77 |annot ac|cess new|
|00002270| 73 20 66 69 6c 65 20 22 | 20 2b 20 54 43 50 49 50 |s file "| + TCPIP|
|00002280| 5f 6d 61 69 6c 5f 64 69 | 72 24 20 2b 20 22 2e 22 |_mail_di|r$ + "."|
|00002290| 20 2b 20 61 62 62 72 24 | 20 2b 20 22 20 2d 20 70 | + abbr$| + " - p|
|000022a0| 65 72 68 61 70 73 20 69 | 74 20 69 73 20 69 6e 20 |erhaps i|t is in |
|000022b0| 75 73 65 22 29 0d 0a 96 | 0b 20 20 20 20 20 20 cd |use")...|.      .|
|000022c0| 0d 0a a0 09 20 20 20 20 | cd 0d 0a aa 13 20 20 fd |....    |.....  .|
|000022d0| 20 69 6e 64 65 78 25 20 | 3d 20 2d 31 0d 0a b4 05 | index% |= -1....|
|000022e0| cd 0d 0a be 05 e1 0d 0a | c8 04 0d 0a d2 12 dd f2 |........|........|
|000022f0| 70 72 6f 63 65 73 73 5f | 6e 65 77 73 0d 0a dc 0b |process_|news....|
|00002300| 4f 4b 25 20 3d 20 a3 0d | 0a e6 14 f2 6f 70 65 6e |OK% = ..|....open|
|00002310| 5f 6e 65 77 73 5f 66 69 | 6c 65 73 0d 0a f0 17 f4 |_news_fi|les.....|
|00002320| 20 50 52 4f 43 74 72 61 | 6e 73 66 65 72 5f 6e 65 | PROCtra|nsfer_ne|
|00002330| 77 73 0d 0a fa 2d 21 6d | 63 64 5f 69 6e 70 75 74 |ws...-!m|cd_input|
|00002340| 5f 66 69 6c 65 5f 68 61 | 6e 64 6c 65 25 20 3d 20 |_file_ha|ndle% = |
|00002350| 6e 65 77 73 5f 77 6f 72 | 6b 5f 66 69 6c 65 25 0d |news_wor|k_file%.|
|00002360| 0b 04 2d 21 6d 63 64 5f | 6f 75 74 70 75 74 5f 66 |..-!mcd_|output_f|
|00002370| 69 6c 65 5f 68 61 6e 64 | 6c 65 25 20 3d 20 6e 65 |ile_hand|le% = ne|
|00002380| 77 73 5f 6f 75 74 5f 66 | 69 6c 65 25 0d 0b 0e 34 |ws_out_f|ile%...4|
|00002390| e7 20 28 6e 65 77 73 5f | 77 6f 72 6b 5f 66 69 6c |. (news_|work_fil|
|000023a0| 65 25 20 3e 20 30 29 20 | 80 20 28 6e 65 77 73 5f |e% > 0) |. (news_|
|000023b0| 6f 75 74 5f 66 69 6c 65 | 25 20 3e 20 30 29 20 8c |out_file|% > 0) .|
|000023c0| 0d 0b 18 19 20 20 d6 20 | 6d 63 5f 74 72 61 6e 73 |....  . |mc_trans|
|000023d0| 66 65 72 5f 6e 65 77 73 | 25 0d 0b 22 05 cd 0d 0b |fer_news|%.."....|
|000023e0| 2c 17 4f 4b 25 20 3d 20 | ac 20 21 6d 63 64 5f 61 |,.OK% = |. !mcd_a|
|000023f0| 62 6f 72 74 25 0d 0b 36 | 15 f2 63 6c 6f 73 65 5f |bort%..6|..close_|
|00002400| 6e 65 77 73 5f 66 69 6c | 65 73 0d 0b 40 0b e7 20 |news_fil|es..@.. |
|00002410| 4f 4b 25 20 8c 0d 0b 4a | 56 20 20 64 75 6d 6d 79 |OK% ...J|V  dummy|
|00002420| 25 20 3d 20 a4 64 65 6c | 65 74 65 5f 66 69 6c 65 |% = .del|ete_file|
|00002430| 28 54 43 50 49 50 5f 6d | 61 69 6c 5f 64 69 72 24 |(TCPIP_m|ail_dir$|
|00002440| 20 2b 20 22 2e 22 20 2b | 20 6e 65 77 73 5f 77 6f | + "." +| news_wo|
|00002450| 72 6b 5f 6e 61 6d 65 24 | 2c 20 22 6e 65 77 73 20 |rk_name$|, "news |
|00002460| 77 6f 72 6b 20 66 69 6c | 65 22 29 0d 0b 54 05 cd |work fil|e")..T..|
|00002470| 0d 0b 5e 05 e1 0d 0b 68 | 04 0d 0b 72 15 dd f2 6f |..^....h|...r...o|
|00002480| 70 65 6e 5f 6e 65 77 73 | 5f 66 69 6c 65 73 0d 0b |pen_news|_files..|
|00002490| 7c 46 6e 65 77 73 5f 77 | 6f 72 6b 5f 66 69 6c 65 ||Fnews_w|ork_file|
|000024a0| 25 20 3d 20 a4 6f 70 65 | 6e 69 6e 28 54 43 50 49 |% = .ope|nin(TCPI|
|000024b0| 50 5f 6d 61 69 6c 5f 64 | 69 72 24 20 2b 20 22 2e |P_mail_d|ir$ + ".|
|000024c0| 22 20 2b 20 6e 65 77 73 | 5f 77 6f 72 6b 5f 6e 61 |" + news|_work_na|
|000024d0| 6d 65 24 29 0d 0b 86 1b | e7 20 6e 65 77 73 5f 77 |me$)....|. news_w|
|000024e0| 6f 72 6b 5f 66 69 6c 65 | 25 20 3d 20 30 20 8c 0d |ork_file|% = 0 ..|
|000024f0| 0b 90 57 20 20 f2 65 72 | 72 6f 72 5f 6d 73 67 28 |..W  .er|ror_msg(|
|00002500| 22 63 61 6e 6e 6f 74 20 | 6f 70 65 6e 20 72 75 63 |"cannot |open ruc|
|00002510| 70 20 77 6f 72 6b 20 66 | 69 6c 65 20 22 20 2b 20 |p work f|ile " + |
|00002520| 54 43 50 49 50 5f 6d 61 | 69 6c 5f 64 69 72 24 20 |TCPIP_ma|il_dir$ |
|00002530| 2b 20 22 2e 22 20 6e 65 | 77 73 5f 77 6f 72 6b 5f |+ "." ne|ws_work_|
|00002540| 6e 61 6d 65 24 29 0d 0b | 9a 05 cc 0d 0b a4 46 20 |name$)..|......F |
|00002550| 20 6e 65 77 73 5f 6f 75 | 74 5f 66 69 6c 65 25 20 | news_ou|t_file% |
|00002560| 3d 20 a4 6f 70 65 6e 61 | 70 70 65 6e 64 28 72 75 |= .opena|ppend(ru|
|00002570| 63 70 5f 64 69 72 24 20 | 2b 20 6e 65 77 73 5f 6f |cp_dir$ |+ news_o|
|00002580| 75 74 5f 70 61 74 68 24 | 20 2b 20 61 62 62 72 24 |ut_path$| + abbr$|
|00002590| 29 0d 0b ae 1c 20 20 e7 | 20 6e 65 77 73 5f 6f 75 |)....  .| news_ou|
|000025a0| 74 5f 66 69 6c 65 25 20 | 3d 20 30 20 8c 0d 0b b8 |t_file% |= 0 ....|
|000025b0| 5f 20 20 20 20 f2 65 72 | 72 6f 72 5f 6d 73 67 28 |_    .er|ror_msg(|
|000025c0| 22 63 61 6e 6e 6f 74 20 | 63 72 65 61 74 65 2f 61 |"cannot |create/a|
|000025d0| 70 70 65 6e 64 20 75 75 | 63 70 20 6e 65 77 73 20 |ppend uu|cp news |
|000025e0| 66 69 6c 65 20 22 20 2b | 20 72 75 63 70 5f 64 69 |file " +| rucp_di|
|000025f0| 72 24 20 2b 20 6e 65 77 | 73 5f 6f 75 74 5f 70 61 |r$ + new|s_out_pa|
|00002600| 74 68 24 20 2b 20 61 62 | 62 72 24 29 0d 0b c2 0d |th$ + ab|br$)....|
|00002610| 20 20 20 20 f2 74 69 64 | 79 0d 0b cc 07 20 20 cd |    .tid|y....  .|
|00002620| 0d 0b d6 3d 20 20 f2 6d | 61 6b 65 5f 66 69 6c 65 |...=  .m|ake_file|
|00002630| 74 79 70 65 5f 74 65 78 | 74 28 72 75 63 70 5f 64 |type_tex|t(rucp_d|
|00002640| 69 72 24 20 2b 20 6e 65 | 77 73 5f 6f 75 74 5f 70 |ir$ + ne|ws_out_p|
|00002650| 61 74 68 24 20 2b 20 61 | 62 62 72 24 29 0d 0b e0 |ath$ + a|bbr$)...|
|00002660| 05 cd 0d 0b ea 05 e1 0d | 0b f4 04 0d 0b fe 13 dd |........|........|
|00002670| f2 74 72 61 6e 73 66 65 | 72 5f 6e 65 77 73 0d 0c |.transfe|r_news..|
|00002680| 08 36 e7 20 28 6e 65 77 | 73 5f 77 6f 72 6b 5f 66 |.6. (new|s_work_f|
|00002690| 69 6c 65 25 20 3c 3e 20 | 30 29 20 80 20 28 6e 65 |ile% <> |0) . (ne|
|000026a0| 77 73 5f 6f 75 74 5f 66 | 69 6c 65 25 20 3c 3e 20 |ws_out_f|ile% <> |
|000026b0| 30 29 20 8c 0d 0c 12 0c | 20 20 4c 25 20 3d 20 39 |0) .....|  L% = 9|
|000026c0| 0d 0c 1c 07 20 20 f5 0d | 0c 26 09 20 20 20 20 f5 |....  ..|.&.    .|
|000026d0| 0d 0c 30 20 20 20 20 20 | 20 20 4f 25 20 3d 20 8f |..0     |  O% = .|
|000026e0| 23 6e 65 77 73 5f 77 6f | 72 6b 5f 66 69 6c 65 25 |#news_wo|rk_file%|
|000026f0| 0d 0c 3a 23 20 20 20 20 | 20 20 6c 69 6e 65 24 20 |..:#    |  line$ |
|00002700| 3d 20 be 23 6e 65 77 73 | 5f 77 6f 72 6b 5f 66 69 |= .#news|_work_fi|
|00002710| 6c 65 25 0d 0c 44 34 20 | 20 20 20 fd 20 c5 23 6e |le%..D4 |   . .#n|
|00002720| 65 77 73 5f 77 6f 72 6b | 5f 66 69 6c 65 25 20 84 |ews_work|_file% .|
|00002730| 20 c0 6c 69 6e 65 24 2c | 38 29 20 3d 20 22 23 21 | .line$,|8) = "#!|
|00002740| 20 72 6e 65 77 73 22 0d | 0c 4e 1e 20 20 20 20 50 | rnews".|.N.    P|
|00002750| 25 20 3d 20 8f 23 6e 65 | 77 73 5f 77 6f 72 6b 5f |% = .#ne|ws_work_|
|00002760| 66 69 6c 65 25 0d 0c 58 | 13 20 20 20 20 e7 20 50 |file%..X|.    . P|
|00002770| 25 20 3e 20 4c 25 20 8c | 0d 0c 62 27 20 20 20 20 |% > L% .|..b'    |
|00002780| 20 20 e7 20 c5 23 6e 65 | 77 73 5f 77 6f 72 6b 5f |  . .#ne|ws_work_|
|00002790| 66 69 6c 65 25 20 8c 20 | 4f 25 20 3d 20 50 25 0d |file% . |O% = P%.|
|000027a0| 0c 6c 16 20 20 20 20 20 | 20 53 25 20 3d 20 4f 25 |.l.     | S% = O%|
|000027b0| 20 2d 20 4c 25 0d 0c 76 | 2f 20 20 20 20 20 20 d5 | - L%..v|/      .|
|000027c0| 23 6e 65 77 73 5f 6f 75 | 74 5f 66 69 6c 65 25 2c |#news_ou|t_file%,|
|000027d0| 20 22 23 21 20 72 6e 65 | 77 73 20 22 20 2b 20 c3 | "#! rne|ws " + .|
|000027e0| 28 53 25 29 0d 0c 80 0b | 20 20 20 20 20 20 f5 0d |(S%)....|      ..|
|000027f0| 0c 8a 21 20 20 20 20 20 | 20 20 20 e7 20 53 25 20 |..!     |   . S% |
|00002800| 3e 20 62 75 66 66 65 72 | 5f 73 69 7a 65 25 20 8c |> buffer|_size% .|
|00002810| 0d 0c 94 44 20 20 20 20 | 20 20 20 20 20 20 c8 99 |...D    |      ..|
|00002820| 20 22 4f 53 5f 47 42 50 | 42 22 2c 20 33 2c 20 6e | "OS_GBP|B", 3, n|
|00002830| 65 77 73 5f 77 6f 72 6b | 5f 66 69 6c 65 25 2c 20 |ews_work|_file%, |
|00002840| 42 25 2c 20 62 75 66 66 | 65 72 5f 73 69 7a 65 25 |B%, buff|er_size%|
|00002850| 2c 20 4c 25 0d 0c 9e 3f | 20 20 20 20 20 20 20 20 |, L%...?|        |
|00002860| 20 20 c8 99 20 22 4f 53 | 5f 47 42 50 42 22 2c 20 |  .. "OS|_GBPB", |
|00002870| 32 2c 20 6e 65 77 73 5f | 6f 75 74 5f 66 69 6c 65 |2, news_|out_file|
|00002880| 25 2c 20 42 25 2c 20 62 | 75 66 66 65 72 5f 73 69 |%, B%, b|uffer_si|
|00002890| 7a 65 25 0d 0c a8 20 20 | 20 20 20 20 20 20 20 20 |ze%...  |        |
|000028a0| 20 4c 25 20 2b 3d 20 62 | 75 66 66 65 72 5f 73 69 | L% += b|uffer_si|
|000028b0| 7a 65 25 0d 0c b2 20 20 | 20 20 20 20 20 20 20 20 |ze%...  |        |
|000028c0| 20 53 25 20 2d 3d 20 62 | 75 66 66 65 72 5f 73 69 | S% -= b|uffer_si|
|000028d0| 7a 65 25 0d 0c bc 0d 20 | 20 20 20 20 20 20 20 cc |ze%.... |       .|
|000028e0| 0d 0c c6 3a 20 20 20 20 | 20 20 20 20 20 20 c8 99 |...:    |      ..|
|000028f0| 20 22 4f 53 5f 47 42 50 | 42 22 2c 20 33 2c 20 6e | "OS_GBP|B", 3, n|
|00002900| 65 77 73 5f 77 6f 72 6b | 5f 66 69 6c 65 25 2c 20 |ews_work|_file%, |
|00002910| 42 25 2c 20 53 25 2c 20 | 4c 25 0d 0c d0 35 20 20 |B%, S%, |L%...5  |
|00002920| 20 20 20 20 20 20 20 20 | c8 99 20 22 4f 53 5f 47 |        |.. "OS_G|
|00002930| 42 50 42 22 2c 20 32 2c | 20 6e 65 77 73 5f 6f 75 |BPB", 2,| news_ou|
|00002940| 74 5f 66 69 6c 65 25 2c | 20 42 25 2c 20 53 25 0d |t_file%,| B%, S%.|
|00002950| 0c da 14 20 20 20 20 20 | 20 20 20 20 20 53 25 20 |...     |     S% |
|00002960| 3d 20 30 0d 0c e4 0d 20 | 20 20 20 20 20 20 20 cd |= 0.... |       .|
|00002970| 0d 0c ee 12 20 20 20 20 | 20 20 fd 20 53 25 20 3d |....    |  . S% =|
|00002980| 20 30 0d 0c f8 11 20 20 | 20 20 20 20 4c 25 20 3d | 0....  |    L% =|
|00002990| 20 50 25 0d 0d 02 09 20 | 20 20 20 cd 0d 0d 0c 19 | P%.... |   .....|
|000029a0| 20 20 fd 20 c5 23 6e 65 | 77 73 5f 77 6f 72 6b 5f |  . .#ne|ws_work_|
|000029b0| 66 69 6c 65 25 0d 0d 16 | 0d 20 20 4f 4b 25 20 3d |file%...|.  OK% =|
|000029c0| 20 b9 0d 0d 20 05 cd 0d | 0d 2a 05 e1 0d 0d 34 04 | ... ...|.*....4.|
|000029d0| 0d 0d 3e 16 dd f2 63 6c | 6f 73 65 5f 6e 65 77 73 |..>...cl|ose_news|
|000029e0| 5f 66 69 6c 65 73 0d 0d | 48 20 f2 63 6c 6f 73 65 |_files..|H .close|
|000029f0| 5f 66 69 6c 65 28 6e 65 | 77 73 5f 77 6f 72 6b 5f |_file(ne|ws_work_|
|00002a00| 66 69 6c 65 25 29 0d 0d | 52 1f f2 63 6c 6f 73 65 |file%)..|R..close|
|00002a10| 5f 66 69 6c 65 28 6e 65 | 77 73 5f 6f 75 74 5f 66 |_file(ne|ws_out_f|
|00002a20| 69 6c 65 25 29 0d 0d 5c | 05 e1 0d 0d 66 04 0d 0d |ile%)..\|....f...|
|00002a30| 70 0d dd f2 6e 65 77 6e | 65 77 73 0d 0d 7a 0e 69 |p...newn|ews..z.i|
|00002a40| 6e 64 65 78 25 20 3d 20 | 30 0d 0d 84 05 f5 0d 0d |ndex% = |0.......|
|00002a50| 8e 66 20 20 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 |.f  .. "|OS_GBPB"|
|00002a60| 2c 20 31 30 2c 20 54 43 | 50 49 50 5f 6d 61 69 6c |, 10, TC|PIP_mail|
|00002a70| 5f 64 69 72 24 2c 20 47 | 42 50 42 5f 62 75 66 25 |_dir$, G|BPB_buf%|
|00002a80| 2c 20 31 2c 20 69 6e 64 | 65 78 25 2c 20 47 42 50 |, 1, ind|ex%, GBP|
|00002a90| 42 5f 62 75 66 5f 6c 65 | 6e 25 2c 20 22 2a 4e 47 |B_buf_le|n%, "*NG|
|00002aa0| 22 20 b8 20 2c 2c 2c 72 | 65 61 64 25 2c 20 69 6e |" . ,,,r|ead%, in|
|00002ab0| 64 65 78 25 0d 0d 98 13 | 20 20 e7 20 72 65 61 64 |dex%....|  . read|
|00002ac0| 25 20 3d 20 31 20 8c 0d | 0d a2 1c 20 20 20 20 e7 |% = 1 ..|...    .|
|00002ad0| 20 47 42 50 42 5f 62 75 | 66 25 21 31 36 20 3d 20 | GBPB_bu|f%!16 = |
|00002ae0| 31 20 8c 0d 0d ac 15 20 | 20 20 20 20 20 61 62 62 |1 ..... |     abb|
|00002af0| 72 76 24 20 3d 20 22 22 | 0d 0d b6 11 20 20 20 20 |rv$ = ""|....    |
|00002b00| 20 20 49 25 20 3d 20 32 | 30 0d 0d c0 1d 20 20 20 |  I% = 2|0....   |
|00002b10| 20 20 20 c8 95 20 47 42 | 50 42 5f 62 75 66 25 3f |   .. GB|PB_buf%?|
|00002b20| 49 25 20 3e 20 30 0d 0d | ca 25 20 20 20 20 20 20 |I% > 0..|.%      |
|00002b30| 20 20 61 62 62 72 76 24 | 20 2b 3d 20 bd 28 47 42 |  abbrv$| += .(GB|
|00002b40| 50 42 5f 62 75 66 25 3f | 49 25 29 0d 0d d4 13 20 |PB_buf%?|I%).... |
|00002b50| 20 20 20 20 20 20 20 49 | 25 20 2b 3d 20 31 0d 0d |       I|% += 1..|
|00002b60| de 0b 20 20 20 20 20 20 | ce 0d 0d e8 48 20 20 20 |..      |....H   |
|00002b70| 20 20 20 c8 99 20 22 4f | 53 5f 46 69 6c 65 22 2c |   .. "O|S_File",|
|00002b80| 20 35 2c 20 54 43 50 49 | 50 5f 6d 61 69 6c 5f 64 | 5, TCPI|P_mail_d|
|00002b90| 69 72 24 20 2b 20 22 2e | 22 20 2b 20 61 62 62 72 |ir$ + ".|" + abbr|
|00002ba0| 76 24 20 b8 20 2c 2c 2c | 2c 20 6c 65 6e 67 74 68 |v$ . ,,,|, length|
|00002bb0| 25 0d 0d f2 19 20 20 20 | 20 20 20 e7 20 6c 65 6e |%....   |   . len|
|00002bc0| 67 74 68 25 20 3e 20 30 | 20 8c 0d 0d fc 56 20 20 |gth% > 0| ....V  |
|00002bd0| 20 20 20 20 20 20 f2 69 | 6e 66 6f 5f 6d 73 67 28 |      .i|nfo_msg(|
|00002be0| 22 54 68 65 72 65 20 61 | 72 65 20 6e 65 77 20 6e |"There a|re new n|
|00002bf0| 65 77 73 67 72 6f 75 70 | 73 20 69 6e 20 22 20 2b |ewsgroup|s in " +|
|00002c00| 20 54 43 50 49 50 5f 6d | 61 69 6c 5f 64 69 72 24 | TCPIP_m|ail_dir$|
|00002c10| 20 2b 20 22 2e 22 20 2b | 20 61 62 62 72 76 24 29 | + "." +| abbrv$)|
|00002c20| 0d 0e 06 0b 20 20 20 20 | 20 20 cc 0d 0e 10 57 20 |....    |  ....W |
|00002c30| 20 20 20 20 20 20 20 64 | 75 6d 6d 79 20 3d 20 a4 |       d|ummy = .|
|00002c40| 64 65 6c 65 74 65 5f 66 | 69 6c 65 28 54 43 50 49 |delete_f|ile(TCPI|
|00002c50| 50 5f 6d 61 69 6c 5f 64 | 69 72 24 20 2b 20 22 2e |P_mail_d|ir$ + ".|
|00002c60| 22 20 2b 20 61 62 62 72 | 76 24 2c 20 22 6e 65 77 |" + abbr|v$, "new|
|00002c70| 20 6e 65 77 73 67 72 6f | 75 70 73 20 66 69 6c 65 | newsgro|ups file|
|00002c80| 22 29 0d 0e 1a 0b 20 20 | 20 20 20 20 cd 0d 0e 24 |")....  |    ...$|
|00002c90| 09 20 20 20 20 cd 0d 0e | 2e 07 20 20 cd 0d 0e 38 |.    ...|..  ...8|
|00002ca0| 11 fd 20 69 6e 64 65 78 | 25 20 3d 20 2d 31 0d 0e |.. index|% = -1..|
|00002cb0| 42 0e 69 6e 64 65 78 25 | 20 3d 20 30 0d 0e 4c 05 |B.index%| = 0..L.|
|00002cc0| f5 0d 0e 56 72 20 20 c8 | 99 20 22 4f 53 5f 47 42 |...Vr  .|. "OS_GB|
|00002cd0| 50 42 22 2c 20 31 30 2c | 20 54 43 50 49 50 5f 6d |PB", 10,| TCPIP_m|
|00002ce0| 61 69 6c 5f 64 69 72 24 | 20 2b 20 22 2e 66 6f 6c |ail_dir$| + ".fol|
|00002cf0| 64 65 72 22 2c 20 47 42 | 50 42 5f 62 75 66 25 2c |der", GB|PB_buf%,|
|00002d00| 20 31 2c 20 69 6e 64 65 | 78 25 2c 20 47 42 50 42 | 1, inde|x%, GBPB|
|00002d10| 5f 62 75 66 5f 6c 65 6e | 25 2c 20 22 2a 4e 47 22 |_buf_len|%, "*NG"|
|00002d20| 20 b8 20 2c 2c 2c 72 65 | 61 64 25 2c 20 69 6e 64 | . ,,,re|ad%, ind|
|00002d30| 65 78 25 0d 0e 60 13 20 | 20 e7 20 72 65 61 64 25 |ex%..`. | . read%|
|00002d40| 20 3d 20 31 20 8c 0d 0e | 6a 1c 20 20 20 20 e7 20 | = 1 ...|j.    . |
|00002d50| 47 42 50 42 5f 62 75 66 | 25 21 31 36 20 3d 20 31 |GBPB_buf|%!16 = 1|
|00002d60| 20 8c 0d 0e 74 15 20 20 | 20 20 20 20 61 62 62 72 | ...t.  |    abbr|
|00002d70| 76 24 20 3d 20 22 22 0d | 0e 7e 11 20 20 20 20 20 |v$ = "".|.~.     |
|00002d80| 20 49 25 20 3d 20 32 30 | 0d 0e 88 1d 20 20 20 20 | I% = 20|....    |
|00002d90| 20 20 c8 95 20 47 42 50 | 42 5f 62 75 66 25 3f 49 |  .. GBP|B_buf%?I|
|00002da0| 25 20 3e 20 30 0d 0e 92 | 25 20 20 20 20 20 20 20 |% > 0...|%       |
|00002db0| 20 61 62 62 72 76 24 20 | 2b 3d 20 bd 28 47 42 50 | abbrv$ |+= .(GBP|
|00002dc0| 42 5f 62 75 66 25 3f 49 | 25 29 0d 0e 9c 13 20 20 |B_buf%?I|%)....  |
|00002dd0| 20 20 20 20 20 20 49 25 | 20 2b 3d 20 31 0d 0e a6 |      I%| += 1...|
|00002de0| 0b 20 20 20 20 20 20 ce | 0d 0e b0 4f 20 20 20 20 |.      .|...O    |
|00002df0| 20 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 20 |  .. "OS|_File", |
|00002e00| 35 2c 20 54 43 50 49 50 | 5f 6d 61 69 6c 5f 64 69 |5, TCPIP|_mail_di|
|00002e10| 72 24 20 2b 20 22 2e 66 | 6f 6c 64 65 72 2e 22 20 |r$ + ".f|older." |
|00002e20| 2b 20 61 62 62 72 76 24 | 20 b8 20 2c 2c 2c 2c 20 |+ abbrv$| . ,,,, |
|00002e30| 6c 65 6e 67 74 68 25 0d | 0e ba 19 20 20 20 20 20 |length%.|...     |
|00002e40| 20 e7 20 6c 65 6e 67 74 | 68 25 20 3e 20 30 20 8c | . lengt|h% > 0 .|
|00002e50| 0d 0e c4 5e 20 20 20 20 | 20 20 20 20 f2 69 6e 66 |...^    |    .inf|
|00002e60| 6f 5f 6d 73 67 28 22 54 | 68 65 72 65 20 61 72 65 |o_msg("T|here are|
|00002e70| 20 6e 65 77 20 6e 65 77 | 73 67 72 6f 75 70 73 20 | new new|sgroups |
|00002e80| 69 6e 20 22 20 2b 20 54 | 43 50 49 50 5f 6d 61 69 |in " + T|CPIP_mai|
|00002e90| 6c 5f 64 69 72 24 20 2b | 20 22 2e 2e 66 6f 6c 64 |l_dir$ +| "..fold|
|00002ea0| 65 72 2e 22 20 2b 20 61 | 62 62 72 76 24 29 0d 0e |er." + a|bbrv$)..|
|00002eb0| ce 0b 20 20 20 20 20 20 | cc 0d 0e d8 5e 20 20 20 |..      |....^   |
|00002ec0| 20 20 20 20 20 64 75 6d | 6d 79 20 3d 20 a4 64 65 |     dum|my = .de|
|00002ed0| 6c 65 74 65 5f 66 69 6c | 65 28 54 43 50 49 50 5f |lete_fil|e(TCPIP_|
|00002ee0| 6d 61 69 6c 5f 64 69 72 | 24 20 2b 20 22 2e 66 6f |mail_dir|$ + ".fo|
|00002ef0| 6c 64 65 72 2e 22 20 2b | 20 61 62 62 72 76 24 2c |lder." +| abbrv$,|
|00002f00| 20 22 6e 65 77 20 6e 65 | 77 73 67 72 6f 75 70 73 | "new ne|wsgroups|
|00002f10| 20 66 69 6c 65 22 29 0d | 0e e2 0b 20 20 20 20 20 | file").|...     |
|00002f20| 20 cd 0d 0e ec 09 20 20 | 20 20 cd 0d 0e f6 07 20 | .....  |  ..... |
|00002f30| 20 cd 0d 0f 00 11 fd 20 | 69 6e 64 65 78 25 20 3d | ...... |index% =|
|00002f40| 20 2d 31 0d 0f 0a 05 e1 | 0d 0f 14 04 0d 0f 1e 0a | -1.....|........|
|00002f50| dd f2 74 69 64 79 0d 0f | 28 15 f2 63 6c 6f 73 65 |..tidy..|(..close|
|00002f60| 5f 6d 61 69 6c 5f 66 69 | 6c 65 73 0d 0f 32 15 f2 |_mail_fi|les..2..|
|00002f70| 63 6c 6f 73 65 5f 6e 65 | 77 73 5f 66 69 6c 65 73 |close_ne|ws_files|
|00002f80| 0d 0f 3c 05 e1 0d 0f 46 | 04 0d 0f 50 4c f4 2d 2d |..<....F|...PL.--|
|00002f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002fa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002fb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002fc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002fd0| 2d 2d 2d 2d 2d 0d 0f 5a | 04 0d 0f 64 0e dd f2 61 |-----..Z|...d...a|
|00002fe0| 73 73 65 6d 62 6c 65 0d | 0f 6e 1c de 20 63 6f 64 |ssemble.|.n.. cod|
|00002ff0| 65 25 20 31 30 20 2a 20 | 31 30 32 34 2c 20 4c 25 |e% 10 * |1024, L%|
|00003000| 20 2d 31 0d 0f 78 04 0d | 0f 82 22 6d 63 72 5f 69 | -1..x..|.."mcr_i|
|00003010| 6e 70 75 74 5f 62 75 66 | 66 65 72 5f 70 6f 69 6e |nput_buf|fer_poin|
|00003020| 74 65 72 25 20 3d 20 31 | 32 0d 0f 8c 20 6d 63 72 |ter% = 1|2... mcr|
|00003030| 5f 69 6e 70 75 74 5f 62 | 75 66 66 65 72 5f 73 74 |_input_b|uffer_st|
|00003040| 61 72 74 25 20 3d 20 31 | 31 0d 0f 96 26 6d 63 72 |art% = 1|1...&mcr|
|00003050| 5f 69 6e 70 75 74 5f 62 | 75 66 66 65 72 5f 6c 6f |_input_b|uffer_lo|
|00003060| 67 69 63 61 6c 5f 65 6e | 64 25 20 3d 20 31 30 0d |gical_en|d% = 10.|
|00003070| 0f a0 1e 6d 63 72 5f 69 | 6e 70 75 74 5f 66 69 6c |...mcr_i|nput_fil|
|00003080| 65 5f 77 69 6e 64 6f 77 | 25 20 3d 20 39 0d 0f aa |e_window|% = 9...|
|00003090| 22 6d 63 72 5f 6f 75 74 | 70 75 74 5f 62 75 66 66 |"mcr_out|put_buff|
|000030a0| 65 72 5f 70 6f 69 6e 74 | 65 72 25 20 3d 20 38 0d |er_point|er% = 8.|
|000030b0| 0f b4 20 6d 63 72 5f 6f | 75 74 70 75 74 5f 62 75 |.. mcr_o|utput_bu|
|000030c0| 66 66 65 72 5f 73 74 61 | 72 74 25 20 3d 20 37 0d |ffer_sta|rt% = 7.|
|000030d0| 0f be 1e 6d 63 72 5f 6f | 75 74 70 75 74 5f 62 75 |...mcr_o|utput_bu|
|000030e0| 66 66 65 72 5f 65 6e 64 | 25 20 3d 20 36 0d 0f c8 |ffer_end|% = 6...|
|000030f0| 1f 6d 63 72 5f 6f 75 74 | 70 75 74 5f 66 69 6c 65 |.mcr_out|put_file|
|00003100| 5f 77 69 6e 64 6f 77 25 | 20 3d 20 35 0d 0f d2 22 |_window%| = 5..."|
|00003110| 6d 63 72 5f 73 74 61 72 | 74 5f 6f 66 5f 6e 65 78 |mcr_star|t_of_nex|
|00003120| 74 5f 6d 65 73 73 61 67 | 65 25 20 3d 20 34 0d 0f |t_messag|e% = 4..|
|00003130| dc 23 6d 63 72 5f 65 6e | 64 5f 6f 66 5f 63 75 72 |.#mcr_en|d_of_cur|
|00003140| 72 65 6e 74 5f 6d 65 73 | 73 61 67 65 25 20 3d 20 |rent_mes|sage% = |
|00003150| 33 0d 0f e6 25 6d 63 72 | 5f 73 74 61 72 74 5f 6f |3...%mcr|_start_o|
|00003160| 66 5f 63 75 72 72 65 6e | 74 5f 6d 65 73 73 61 67 |f_curren|t_messag|
|00003170| 65 25 20 3d 20 32 0d 0f | f0 04 0d 0f fa 1a e7 20 |e% = 2..|....... |
|00003180| 64 65 62 75 67 25 20 80 | 20 64 65 62 75 67 5f 6d |debug% .| debug_m|
|00003190| 63 25 20 8c 0d 10 04 25 | 20 20 e7 20 6d 63 64 65 |c% ....%|  . mcde|
|000031a0| 62 75 67 25 20 80 20 6d | 63 64 65 62 75 67 5f 6c |bug% . m|cdebug_l|
|000031b0| 69 73 74 69 6e 67 25 20 | 8c 0d 10 0e 13 20 20 20 |isting% |.....   |
|000031c0| 20 73 74 65 70 25 20 3d | 20 25 31 31 0d 10 18 07 | step% =| %11....|
|000031d0| 20 20 cd 0d 10 22 05 cc | 0d 10 2c 13 20 20 20 20 |  ..."..|..,.    |
|000031e0| 73 74 65 70 25 20 3d 20 | 25 31 30 0d 10 36 05 cd |step% = |%10..6..|
|000031f0| 0d 10 40 2b e3 20 70 61 | 73 73 25 20 3d 20 25 31 |..@+. pa|ss% = %1|
|00003200| 30 30 30 20 b8 20 25 31 | 30 30 30 20 2b 20 73 74 |000 . %1|000 + st|
|00003210| 65 70 25 20 88 20 73 74 | 65 70 25 0d 10 4a 0e 50 |ep% . st|ep%..J.P|
|00003220| 25 20 3d 20 63 6f 64 65 | 25 0d 10 54 0f 5b 20 4f |% = code|%..T.[ O|
|00003230| 50 54 20 70 61 73 73 25 | 0d 10 5e 16 2e 6d 63 64 |PT pass%|..^..mcd|
|00003240| 5f 61 62 6f 72 74 25 20 | 45 51 55 44 20 30 0d 10 |_abort% |EQUD 0..|
|00003250| 68 1c 2e 6d 63 64 5f 61 | 62 6f 72 74 5f 73 74 61 |h..mcd_a|bort_sta|
|00003260| 63 6b 25 20 45 51 55 44 | 20 30 0d 10 72 27 2e 6d |ck% EQUD| 0..r'.m|
|00003270| 63 64 5f 62 75 66 66 65 | 72 5f 73 69 7a 65 25 20 |cd_buffe|r_size% |
|00003280| 45 51 55 44 20 62 75 66 | 66 65 72 5f 73 69 7a 65 |EQUD buf|fer_size|
|00003290| 25 0d 10 7c 23 2e 6d 63 | 64 5f 61 6c 69 67 6e 6d |%..|#.mc|d_alignm|
|000032a0| 65 6e 74 25 20 45 51 55 | 44 20 61 6c 69 67 6e 6d |ent% EQU|D alignm|
|000032b0| 65 6e 74 25 0d 10 86 22 | 2e 6d 63 64 5f 69 6e 70 |ent%..."|.mcd_inp|
|000032c0| 75 74 5f 66 69 6c 65 5f | 68 61 6e 64 6c 65 25 20 |ut_file_|handle% |
|000032d0| 45 51 55 44 20 30 0d 10 | 90 2f 2e 6d 63 64 5f 69 |EQUD 0..|./.mcd_i|
|000032e0| 6e 70 75 74 5f 62 75 66 | 66 65 72 5f 73 74 61 72 |nput_buf|fer_star|
|000032f0| 74 25 20 45 51 55 44 20 | 69 6e 70 75 74 5f 62 75 |t% EQUD |input_bu|
|00003300| 66 66 65 72 25 0d 10 9a | 45 2e 6d 63 64 5f 69 6e |ffer%...|E.mcd_in|
|00003310| 70 75 74 5f 62 75 66 66 | 65 72 5f 70 68 79 73 69 |put_buff|er_physi|
|00003320| 63 61 6c 5f 65 6e 64 25 | 20 45 51 55 44 20 69 6e |cal_end%| EQUD in|
|00003330| 70 75 74 5f 62 75 66 66 | 65 72 25 20 2b 20 62 75 |put_buff|er% + bu|
|00003340| 66 66 65 72 5f 73 69 7a | 65 25 0d 10 a4 23 2e 6d |ffer_siz|e%...#.m|
|00003350| 63 64 5f 6f 75 74 70 75 | 74 5f 66 69 6c 65 5f 68 |cd_outpu|t_file_h|
|00003360| 61 6e 64 6c 65 25 20 45 | 51 55 44 20 30 0d 10 ae |andle% E|QUD 0...|
|00003370| 31 2e 6d 63 64 5f 6f 75 | 74 70 75 74 5f 62 75 66 |1.mcd_ou|tput_buf|
|00003380| 66 65 72 5f 73 74 61 72 | 74 25 20 45 51 55 44 20 |fer_star|t% EQUD |
|00003390| 6f 75 74 70 75 74 5f 62 | 75 66 66 65 72 25 0d 10 |output_b|uffer%..|
|000033a0| b8 3e 2e 6d 63 64 5f 6f | 75 74 70 75 74 5f 62 75 |.>.mcd_o|utput_bu|
|000033b0| 66 66 65 72 5f 65 6e 64 | 25 20 45 51 55 44 20 6f |ffer_end|% EQUD o|
|000033c0| 75 74 70 75 74 5f 62 75 | 66 66 65 72 25 20 2b 20 |utput_bu|ffer% + |
|000033d0| 62 75 66 66 65 72 5f 73 | 69 7a 65 25 0d 10 c2 22 |buffer_s|ize%..."|
|000033e0| 2e 6d 63 64 5f 73 74 61 | 72 74 5f 6f 66 5f 6d 65 |.mcd_sta|rt_of_me|
|000033f0| 73 73 61 67 65 25 20 45 | 51 55 44 20 2d 31 0d 10 |ssage% E|QUD -1..|
|00003400| cc 04 0d 10 d6 14 2e 6d | 63 5f 66 61 74 61 6c 5f |.......m|c_fatal_|
|00003410| 65 72 72 6f 72 25 0d 10 | e0 1a 53 57 49 20 22 4f |error%..|..SWI "O|
|00003420| 53 5f 47 65 6e 65 72 61 | 74 65 45 72 72 6f 72 22 |S_Genera|teError"|
|00003430| 0d 10 ea 0e 4d 56 4e 20 | 52 30 2c 20 23 30 0d 10 |....MVN |R0, #0..|
|00003440| f4 16 53 54 52 20 52 30 | 2c 20 6d 63 64 5f 61 62 |..STR R0|, mcd_ab|
|00003450| 6f 72 74 25 0d 10 fe 1d | 4c 44 52 20 52 31 33 2c |ort%....|LDR R13,|
|00003460| 20 6d 63 64 5f 61 62 6f | 72 74 5f 73 74 61 63 6b | mcd_abo|rt_stack|
|00003470| 25 0d 11 08 1d 4c 44 4d | 46 44 20 52 31 33 21 2c |%....LDM|FD R13!,|
|00003480| 20 7b 52 30 2d 52 31 32 | 2c 20 50 43 7d 5e 0d 11 | {R0-R12|, PC}^..|
|00003490| 12 04 0d 11 1c 0e 2e 6d | 63 5f 65 72 72 6f 72 25 |.......m|c_error%|
|000034a0| 0d 11 26 29 a4 6d 63 6d | 5f 70 72 69 6e 74 28 22 |..&).mcm|_print("|
|000034b0| 4d 61 63 68 69 6e 65 20 | 63 6f 64 65 20 65 72 72 |Machine |code err|
|000034c0| 6f 72 3a 20 22 2c 20 a3 | 29 0d 11 30 13 53 57 49 |or: ", .|)..0.SWI|
|000034d0| 20 22 4f 53 5f 57 72 69 | 74 65 30 22 0d 11 3a 16 | "OS_Wri|te0"..:.|
|000034e0| a4 6d 63 6d 5f 70 72 69 | 6e 74 28 22 2e 22 2c 20 |.mcm_pri|nt(".", |
|000034f0| b9 29 0d 11 44 14 53 57 | 49 20 22 4f 53 5f 4e 65 |.)..D.SW|I "OS_Ne|
|00003500| 77 4c 69 6e 65 22 0d 11 | 4e 0e 4d 56 4e 20 52 30 |wLine"..|N.MVN R0|
|00003510| 2c 20 23 30 0d 11 58 16 | 53 54 52 20 52 30 2c 20 |, #0..X.|STR R0, |
|00003520| 6d 63 64 5f 61 62 6f 72 | 74 25 0d 11 62 1d 4c 44 |mcd_abor|t%..b.LD|
|00003530| 52 20 52 31 33 2c 20 6d | 63 64 5f 61 62 6f 72 74 |R R13, m|cd_abort|
|00003540| 5f 73 74 61 63 6b 25 0d | 11 6c 1d 4c 44 4d 46 44 |_stack%.|.l.LDMFD|
|00003550| 20 52 31 33 21 2c 20 7b | 52 30 2d 52 31 32 2c 20 | R13!, {|R0-R12, |
|00003560| 50 43 7d 5e 0d 11 76 04 | 0d 11 80 16 2e 6d 63 5f |PC}^..v.|.....mc_|
|00003570| 74 72 61 6e 73 66 65 72 | 5f 6d 61 69 6c 25 0d 11 |transfer|_mail%..|
|00003580| 8a 1d 53 54 4d 46 44 20 | 52 31 33 21 2c 20 7b 52 |..STMFD |R13!, {R|
|00003590| 30 2d 52 31 32 2c 20 52 | 31 34 7d 0d 11 94 1d 53 |0-R12, R|14}....S|
|000035a0| 54 52 20 52 31 33 2c 20 | 6d 63 64 5f 61 62 6f 72 |TR R13, |mcd_abor|
|000035b0| 74 5f 73 74 61 63 6b 25 | 0d 11 9e 0f 42 4c 20 6d |t_stack%|....BL m|
|000035c0| 63 5f 69 6e 69 74 25 0d | 11 a8 1c a4 6d 63 6d 5f |c_init%.|....mcm_|
|000035d0| 67 65 74 5f 6e 65 78 74 | 5f 69 6e 70 75 74 5f 62 |get_next|_input_b|
|000035e0| 79 74 65 0d 11 b2 1e 4c | 44 4d 43 53 46 44 20 52 |yte....L|DMCSFD R|
|000035f0| 31 33 21 2c 20 7b 52 30 | 2d 52 31 32 2c 20 50 43 |13!, {R0|-R12, PC|
|00003600| 7d 0d 11 bc 40 53 55 42 | 20 6d 63 72 5f 69 6e 70 |}...@SUB| mcr_inp|
|00003610| 75 74 5f 62 75 66 66 65 | 72 5f 70 6f 69 6e 74 65 |ut_buffe|r_pointe|
|00003620| 72 25 2c 20 6d 63 72 5f | 69 6e 70 75 74 5f 62 75 |r%, mcr_|input_bu|
|00003630| 66 66 65 72 5f 70 6f 69 | 6e 74 65 72 25 2c 20 23 |ffer_poi|nter%, #|
|00003640| 31 0d 11 c6 0e 43 4d 50 | 20 52 30 2c 20 23 31 0d |1....CMP| R0, #1.|
|00003650| 11 d0 18 42 4c 45 51 20 | 6d 63 5f 61 70 70 65 6e |...BLEQ |mc_appen|
|00003660| 64 5f 6d 61 69 6c 25 0d | 11 da 19 42 4c 4e 45 20 |d_mail%.|...BLNE |
|00003670| 6d 63 5f 63 6f 6e 76 65 | 72 74 5f 6d 61 69 6c 25 |mc_conve|rt_mail%|
|00003680| 0d 11 e4 1e 42 4c 20 6d | 63 5f 66 6c 75 73 68 5f |....BL m|c_flush_|
|00003690| 6f 75 74 70 75 74 5f 62 | 75 66 66 65 72 25 0d 11 |output_b|uffer%..|
|000036a0| ee 1c 4c 44 4d 46 44 20 | 52 31 33 21 2c 20 7b 52 |..LDMFD |R13!, {R|
|000036b0| 30 2d 52 31 32 2c 20 50 | 43 7d 0d 11 f8 04 0d 12 |0-R12, P|C}......|
|000036c0| 02 14 2e 6d 63 5f 61 70 | 70 65 6e 64 5f 6d 61 69 |...mc_ap|pend_mai|
|000036d0| 6c 25 0d 12 0c 19 53 54 | 4d 46 44 20 52 31 33 21 |l%....ST|MFD R13!|
|000036e0| 2c 20 7b 52 30 2c 20 52 | 31 34 7d 0d 12 16 1a 2e |, {R0, R|14}.....|
|000036f0| 6d 63 5f 61 70 70 65 6e | 64 5f 6d 61 69 6c 5f 5f |mc_appen|d_mail__|
|00003700| 6c 6f 6f 70 25 0d 12 20 | 1c a4 6d 63 6d 5f 67 65 |loop%.. |..mcm_ge|
|00003710| 74 5f 6e 65 78 74 5f 69 | 6e 70 75 74 5f 62 79 74 |t_next_i|nput_byt|
|00003720| 65 0d 12 2a 21 42 4c 43 | 43 20 6d 63 5f 70 75 74 |e..*!BLC|C mc_put|
|00003730| 5f 6e 65 78 74 5f 6f 75 | 74 70 75 74 5f 62 79 74 |_next_ou|tput_byt|
|00003740| 65 25 0d 12 34 1d 42 43 | 43 20 6d 63 5f 61 70 70 |e%..4.BC|C mc_app|
|00003750| 65 6e 64 5f 6d 61 69 6c | 5f 5f 6c 6f 6f 70 25 0d |end_mail|__loop%.|
|00003760| 12 3e 19 4c 44 4d 46 44 | 20 52 31 33 21 2c 20 7b |.>.LDMFD| R13!, {|
|00003770| 52 30 2c 20 50 43 7d 5e | 0d 12 48 04 0d 12 52 15 |R0, PC}^|..H...R.|
|00003780| 2e 6d 63 5f 63 6f 6e 76 | 65 72 74 5f 6d 61 69 6c |.mc_conv|ert_mail|
|00003790| 25 0d 12 5c 1c 53 54 4d | 46 44 20 52 31 33 21 2c |%..\.STM|FD R13!,|
|000037a0| 20 7b 52 30 2d 52 34 2c | 20 52 31 34 7d 0d 12 66 | {R0-R4,| R14}..f|
|000037b0| 18 a4 6d 63 6d 5f 70 75 | 74 5f 6d 61 69 6c 5f 68 |..mcm_pu|t_mail_h|
|000037c0| 65 61 64 65 72 0d 12 70 | 27 41 44 52 20 52 32 2c |eader..p|'ADR R2,|
|000037d0| 20 6d 63 64 5f 6d 61 69 | 6c 5f 6d 65 73 73 61 67 | mcd_mai|l_messag|
|000037e0| 65 5f 73 65 70 61 72 61 | 74 6f 72 25 0d 12 7a 15 |e_separa|tor%..z.|
|000037f0| 4c 44 52 42 20 52 31 2c | 20 5b 52 32 5d 2c 20 23 |LDRB R1,| [R2], #|
|00003800| 31 0d 12 84 0e 4d 4f 56 | 20 52 33 2c 20 52 32 0d |1....MOV| R3, R2.|
|00003810| 12 8e 1c 2e 6d 63 5f 63 | 6f 6e 76 65 72 74 5f 6d |....mc_c|onvert_m|
|00003820| 61 69 6c 5f 5f 6c 6f 6f | 70 31 25 0d 12 98 1c a4 |ail__loo|p1%.....|
|00003830| 6d 63 6d 5f 67 65 74 5f | 6e 65 78 74 5f 69 6e 70 |mcm_get_|next_inp|
|00003840| 75 74 5f 62 79 74 65 0d | 12 a2 1e 4c 44 4d 43 53 |ut_byte.|...LDMCS|
|00003850| 46 44 20 52 31 33 21 2c | 20 7b 52 30 2d 52 34 2c |FD R13!,| {R0-R4,|
|00003860| 20 50 43 7d 5e 0d 12 ac | 1d 2e 6d 63 5f 63 6f 6e | PC}^...|..mc_con|
|00003870| 76 65 72 74 5f 6d 61 69 | 6c 5f 5f 6c 6f 6f 70 31 |vert_mai|l__loop1|
|00003880| 61 25 0d 12 b6 1f 42 4c | 20 6d 63 5f 70 75 74 5f |a%....BL| mc_put_|
|00003890| 6e 65 78 74 5f 6f 75 74 | 70 75 74 5f 62 79 74 65 |next_out|put_byte|
|000038a0| 25 0d 12 c0 0e 43 4d 50 | 20 52 30 2c 20 52 31 0d |%....CMP| R0, R1.|
|000038b0| 12 ca 1f 42 4e 45 20 6d | 63 5f 63 6f 6e 76 65 72 |...BNE m|c_conver|
|000038c0| 74 5f 6d 61 69 6c 5f 5f | 6c 6f 6f 70 31 25 0d 12 |t_mail__|loop1%..|
|000038d0| d4 1c 2e 6d 63 5f 63 6f | 6e 76 65 72 74 5f 6d 61 |...mc_co|nvert_ma|
|000038e0| 69 6c 5f 5f 6c 6f 6f 70 | 32 25 0d 12 de 15 4c 44 |il__loop|2%....LD|
|000038f0| 52 42 20 52 31 2c 20 5b | 52 32 5d 2c 20 23 31 0d |RB R1, [|R2], #1.|
|00003900| 12 e8 1c a4 6d 63 6d 5f | 67 65 74 5f 6e 65 78 74 |....mcm_|get_next|
|00003910| 5f 69 6e 70 75 74 5f 62 | 79 74 65 0d 12 f2 25 42 |_input_b|yte...%B|
|00003920| 43 53 20 6d 63 5f 63 6f | 6e 76 65 72 74 5f 6d 61 |CS mc_co|nvert_ma|
|00003930| 69 6c 5f 5f 66 69 6e 61 | 6c 5f 68 65 61 76 65 25 |il__fina|l_heave%|
|00003940| 0d 12 fc 0e 43 4d 50 20 | 52 31 2c 20 23 30 0d 13 |....CMP |R1, #0..|
|00003950| 06 29 42 45 51 20 6d 63 | 5f 63 6f 6e 76 65 72 74 |.)BEQ mc|_convert|
|00003960| 5f 6d 61 69 6c 5f 5f 73 | 65 70 61 72 61 74 6f 72 |_mail__s|eparator|
|00003970| 5f 66 6f 75 6e 64 25 0d | 13 10 0e 43 4d 50 20 52 |_found%.|...CMP R|
|00003980| 30 2c 20 52 31 0d 13 1a | 1f 42 45 51 20 6d 63 5f |0, R1...|.BEQ mc_|
|00003990| 63 6f 6e 76 65 72 74 5f | 6d 61 69 6c 5f 5f 6c 6f |convert_|mail__lo|
|000039a0| 6f 70 32 25 0d 13 24 0e | 4d 4f 56 20 52 34 2c 20 |op2%..$.|MOV R4, |
|000039b0| 52 30 0d 13 2e 23 42 20 | 6d 63 5f 63 6f 6e 76 65 |R0...#B |mc_conve|
|000039c0| 72 74 5f 6d 61 69 6c 5f | 5f 72 65 67 75 72 67 69 |rt_mail_|_regurgi|
|000039d0| 74 61 74 65 25 0d 13 38 | 26 2e 6d 63 5f 63 6f 6e |tate%..8|&.mc_con|
|000039e0| 76 65 72 74 5f 6d 61 69 | 6c 5f 5f 73 65 70 61 72 |vert_mai|l__separ|
|000039f0| 61 74 6f 72 5f 66 6f 75 | 6e 64 25 0d 13 42 0e 4d |ator_fou|nd%..B.M|
|00003a00| 4f 56 20 52 34 2c 20 52 | 30 0d 13 4c 18 a4 6d 63 |OV R4, R|0..L..mc|
|00003a10| 6d 5f 70 75 74 5f 6d 61 | 69 6c 5f 68 65 61 64 65 |m_put_ma|il_heade|
|00003a20| 72 0d 13 56 22 2e 6d 63 | 5f 63 6f 6e 76 65 72 74 |r..V".mc|_convert|
|00003a30| 5f 6d 61 69 6c 5f 5f 72 | 65 67 75 72 67 69 74 61 |_mail__r|egurgita|
|00003a40| 74 65 25 0d 13 60 15 4c | 44 52 42 20 52 30 2c 20 |te%..`.L|DRB R0, |
|00003a50| 5b 52 33 5d 2c 20 23 31 | 0d 13 6a 0e 43 4d 50 20 |[R3], #1|..j.CMP |
|00003a60| 52 33 2c 20 52 32 0d 13 | 74 21 42 4c 4c 4f 20 6d |R3, R2..|t!BLLO m|
|00003a70| 63 5f 70 75 74 5f 6e 65 | 78 74 5f 6f 75 74 70 75 |c_put_ne|xt_outpu|
|00003a80| 74 5f 62 79 74 65 25 0d | 13 7e 25 42 4c 4f 20 6d |t_byte%.|.~%BLO m|
|00003a90| 63 5f 63 6f 6e 76 65 72 | 74 5f 6d 61 69 6c 5f 5f |c_conver|t_mail__|
|00003aa0| 72 65 67 75 72 67 69 74 | 61 74 65 25 0d 13 88 27 |regurgit|ate%...'|
|00003ab0| 41 44 52 20 52 32 2c 20 | 6d 63 64 5f 6d 61 69 6c |ADR R2, |mcd_mail|
|00003ac0| 5f 6d 65 73 73 61 67 65 | 5f 73 65 70 61 72 61 74 |_message|_separat|
|00003ad0| 6f 72 25 0d 13 92 15 4c | 44 52 42 20 52 31 2c 20 |or%....L|DRB R1, |
|00003ae0| 5b 52 32 5d 2c 20 23 31 | 0d 13 9c 0e 4d 4f 56 20 |[R2], #1|....MOV |
|00003af0| 52 33 2c 20 52 32 0d 13 | a6 0e 4d 4f 56 20 52 30 |R3, R2..|..MOV R0|
|00003b00| 2c 20 52 34 0d 13 b0 1e | 42 20 6d 63 5f 63 6f 6e |, R4....|B mc_con|
|00003b10| 76 65 72 74 5f 6d 61 69 | 6c 5f 5f 6c 6f 6f 70 31 |vert_mai|l__loop1|
|00003b20| 61 25 0d 13 ba 22 2e 6d | 63 5f 63 6f 6e 76 65 72 |a%...".m|c_conver|
|00003b30| 74 5f 6d 61 69 6c 5f 5f | 66 69 6e 61 6c 5f 68 65 |t_mail__|final_he|
|00003b40| 61 76 65 25 0d 13 c4 15 | 4c 44 52 42 20 52 30 2c |ave%....|LDRB R0,|
|00003b50| 20 5b 52 33 5d 2c 20 23 | 31 0d 13 ce 0e 43 4d 50 | [R3], #|1....CMP|
|00003b60| 20 52 33 2c 20 52 32 0d | 13 d8 21 42 4c 4c 4f 20 | R3, R2.|..!BLLO |
|00003b70| 6d 63 5f 70 75 74 5f 6e | 65 78 74 5f 6f 75 74 70 |mc_put_n|ext_outp|
|00003b80| 75 74 5f 62 79 74 65 25 | 0d 13 e2 25 42 4c 4f 20 |ut_byte%|...%BLO |
|00003b90| 6d 63 5f 63 6f 6e 76 65 | 72 74 5f 6d 61 69 6c 5f |mc_conve|rt_mail_|
|00003ba0| 5f 66 69 6e 61 6c 5f 68 | 65 61 76 65 25 0d 13 ec |_final_h|eave%...|
|00003bb0| 1c 4c 44 4d 46 44 20 52 | 31 33 21 2c 20 7b 52 30 |.LDMFD R|13!, {R0|
|00003bc0| 2d 52 34 2c 20 50 43 7d | 5e 0d 13 f6 20 2e 6d 63 |-R4, PC}|^... .mc|
|00003bd0| 64 5f 6d 61 69 6c 5f 6d | 65 73 73 61 67 65 5f 73 |d_mail_m|essage_s|
|00003be0| 65 70 61 72 61 74 6f 72 | 25 0d 14 00 26 45 51 55 |eparator|%...&EQU|
|00003bf0| 53 20 bd 28 6d 61 69 6c | 5f 65 6f 6c 25 29 20 2b |S .(mail|_eol%) +|
|00003c00| 20 22 46 72 6f 6d 20 22 | 20 2b 20 bd 28 30 29 0d | "From "| + .(0).|
|00003c10| 14 0a 09 41 4c 49 47 4e | 0d 14 14 04 0d 14 1e 16 |...ALIGN|........|
|00003c20| 2e 6d 63 5f 74 72 61 6e | 73 66 65 72 5f 6e 65 77 |.mc_tran|sfer_new|
|00003c30| 73 25 0d 14 28 1d 53 54 | 4d 46 44 20 52 31 33 21 |s%..(.ST|MFD R13!|
|00003c40| 2c 20 7b 52 30 2d 52 31 | 32 2c 20 52 31 34 7d 0d |, {R0-R1|2, R14}.|
|00003c50| 14 32 1d 53 54 52 20 52 | 31 33 2c 20 6d 63 64 5f |.2.STR R|13, mcd_|
|00003c60| 61 62 6f 72 74 5f 73 74 | 61 63 6b 25 0d 14 3c 0f |abort_st|ack%..<.|
|00003c70| 42 4c 20 6d 63 5f 69 6e | 69 74 25 0d 14 46 1c 42 |BL mc_in|it%..F.B|
|00003c80| 4c 20 6d 63 5f 6c 6f 61 | 64 5f 69 6e 70 75 74 5f |L mc_loa|d_input_|
|00003c90| 62 75 66 66 65 72 25 0d | 14 50 1c 2e 6d 63 5f 74 |buffer%.|.P..mc_t|
|00003ca0| 72 61 6e 73 66 65 72 5f | 6e 65 77 73 5f 5f 6c 6f |ransfer_|news__lo|
|00003cb0| 6f 70 25 0d 14 5a 21 42 | 4c 20 6d 63 5f 66 69 6e |op%..Z!B|L mc_fin|
|00003cc0| 64 5f 6d 65 73 73 61 67 | 65 5f 73 65 70 61 72 61 |d_messag|e_separa|
|00003cd0| 74 6f 72 25 0d 14 64 1b | 42 4c 20 6d 63 5f 74 72 |tor%..d.|BL mc_tr|
|00003ce0| 61 6e 73 66 65 72 5f 6d | 65 73 73 61 67 65 25 0d |ansfer_m|essage%.|
|00003cf0| 14 6e 41 4d 4f 56 20 6d | 63 72 5f 73 74 61 72 74 |.nAMOV m|cr_start|
|00003d00| 5f 6f 66 5f 63 75 72 72 | 65 6e 74 5f 6d 65 73 73 |_of_curr|ent_mess|
|00003d10| 61 67 65 25 2c 20 6d 63 | 72 5f 73 74 61 72 74 5f |age%, mc|r_start_|
|00003d20| 6f 66 5f 6e 65 78 74 5f | 6d 65 73 73 61 67 65 25 |of_next_|message%|
|00003d30| 0d 14 78 1f 42 43 43 20 | 6d 63 5f 74 72 61 6e 73 |..x.BCC |mc_trans|
|00003d40| 66 65 72 5f 6e 65 77 73 | 5f 5f 6c 6f 6f 70 25 0d |fer_news|__loop%.|
|00003d50| 14 82 1e 42 4c 20 6d 63 | 5f 66 6c 75 73 68 5f 6f |...BL mc|_flush_o|
|00003d60| 75 74 70 75 74 5f 62 75 | 66 66 65 72 25 0d 14 8c |utput_bu|ffer%...|
|00003d70| 1b 2e 6d 63 5f 74 72 61 | 6e 73 66 65 72 5f 6e 65 |..mc_tra|nsfer_ne|
|00003d80| 77 73 5f 5f 65 6e 64 25 | 0d 14 96 1c 4c 44 4d 46 |ws__end%|....LDMF|
|00003d90| 44 20 52 31 33 21 2c 20 | 7b 52 30 2d 52 31 32 2c |D R13!, |{R0-R12,|
|00003da0| 20 50 43 7d 0d 14 a0 04 | 0d 14 aa 0d 2e 6d 63 5f | PC}....|.....mc_|
|00003db0| 69 6e 69 74 25 0d 14 b4 | 38 4c 44 52 20 6d 63 72 |init%...|8LDR mcr|
|00003dc0| 5f 69 6e 70 75 74 5f 62 | 75 66 66 65 72 5f 73 74 |_input_b|uffer_st|
|00003dd0| 61 72 74 25 2c 20 6d 63 | 64 5f 69 6e 70 75 74 5f |art%, mc|d_input_|
|00003de0| 62 75 66 66 65 72 5f 73 | 74 61 72 74 25 0d 14 be |buffer_s|tart%...|
|00003df0| 45 4c 44 52 20 6d 63 72 | 5f 69 6e 70 75 74 5f 62 |ELDR mcr|_input_b|
|00003e00| 75 66 66 65 72 5f 6c 6f | 67 69 63 61 6c 5f 65 6e |uffer_lo|gical_en|
|00003e10| 64 25 2c 20 6d 63 64 5f | 69 6e 70 75 74 5f 62 75 |d%, mcd_|input_bu|
|00003e20| 66 66 65 72 5f 70 68 79 | 73 69 63 61 6c 5f 65 6e |ffer_phy|sical_en|
|00003e30| 64 25 0d 14 c8 40 4d 4f | 56 20 6d 63 72 5f 69 6e |d%...@MO|V mcr_in|
|00003e40| 70 75 74 5f 62 75 66 66 | 65 72 5f 70 6f 69 6e 74 |put_buff|er_point|
|00003e50| 65 72 25 2c 20 6d 63 72 | 5f 69 6e 70 75 74 5f 62 |er%, mcr|_input_b|
|00003e60| 75 66 66 65 72 5f 6c 6f | 67 69 63 61 6c 5f 65 6e |uffer_lo|gical_en|
|00003e70| 64 25 0d 14 d2 56 53 55 | 42 20 6d 63 72 5f 69 6e |d%...VSU|B mcr_in|
|00003e80| 70 75 74 5f 66 69 6c 65 | 5f 77 69 6e 64 6f 77 25 |put_file|_window%|
|00003e90| 2c 20 6d 63 72 5f 69 6e | 70 75 74 5f 62 75 66 66 |, mcr_in|put_buff|
|00003ea0| 65 72 5f 73 74 61 72 74 | 25 2c 20 6d 63 72 5f 69 |er_start|%, mcr_i|
|00003eb0| 6e 70 75 74 5f 62 75 66 | 66 65 72 5f 6c 6f 67 69 |nput_buf|fer_logi|
|00003ec0| 63 61 6c 5f 65 6e 64 25 | 0d 14 dc 3a 4c 44 52 20 |cal_end%|...:LDR |
|00003ed0| 6d 63 72 5f 6f 75 74 70 | 75 74 5f 62 75 66 66 65 |mcr_outp|ut_buffe|
|00003ee0| 72 5f 73 74 61 72 74 25 | 2c 20 6d 63 64 5f 6f 75 |r_start%|, mcd_ou|
|00003ef0| 74 70 75 74 5f 62 75 66 | 66 65 72 5f 73 74 61 72 |tput_buf|fer_star|
|00003f00| 74 25 0d 14 e6 36 4c 44 | 52 20 6d 63 72 5f 6f 75 |t%...6LD|R mcr_ou|
|00003f10| 74 70 75 74 5f 62 75 66 | 66 65 72 5f 65 6e 64 25 |tput_buf|fer_end%|
|00003f20| 2c 20 6d 63 64 5f 6f 75 | 74 70 75 74 5f 62 75 66 |, mcd_ou|tput_buf|
|00003f30| 66 65 72 5f 65 6e 64 25 | 0d 14 f0 3c 4d 4f 56 20 |fer_end%|...<MOV |
|00003f40| 6d 63 72 5f 6f 75 74 70 | 75 74 5f 62 75 66 66 65 |mcr_outp|ut_buffe|
|00003f50| 72 5f 70 6f 69 6e 74 65 | 72 25 2c 20 6d 63 72 5f |r_pointe|r%, mcr_|
|00003f60| 6f 75 74 70 75 74 5f 62 | 75 66 66 65 72 5f 73 74 |output_b|uffer_st|
|00003f70| 61 72 74 25 0d 14 fa 0e | 4d 4f 56 20 52 30 2c 20 |art%....|MOV R0, |
|00003f80| 23 32 0d 15 04 23 4c 44 | 52 20 52 31 2c 20 6d 63 |#2...#LD|R R1, mc|
|00003f90| 64 5f 6f 75 74 70 75 74 | 5f 66 69 6c 65 5f 68 61 |d_output|_file_ha|
|00003fa0| 6e 64 6c 65 25 0d 15 0e | 12 53 57 49 20 22 58 4f |ndle%...|.SWI "XO|
|00003fb0| 53 5f 41 72 67 73 22 0d | 15 18 23 4d 4f 56 20 6d |S_Args".|..#MOV m|
|00003fc0| 63 72 5f 6f 75 74 70 75 | 74 5f 66 69 6c 65 5f 77 |cr_outpu|t_file_w|
|00003fd0| 69 6e 64 6f 77 25 2c 20 | 52 32 0d 15 22 29 4d 4f |indow%, |R2..")MO|
|00003fe0| 56 20 6d 63 72 5f 73 74 | 61 72 74 5f 6f 66 5f 63 |V mcr_st|art_of_c|
|00003ff0| 75 72 72 65 6e 74 5f 6d | 65 73 73 61 67 65 25 2c |urrent_m|essage%,|
|00004000| 20 23 30 0d 15 2c 27 4d | 4f 56 20 6d 63 72 5f 65 | #0..,'M|OV mcr_e|
|00004010| 6e 64 5f 6f 66 5f 63 75 | 72 72 65 6e 74 5f 6d 65 |nd_of_cu|rrent_me|
|00004020| 73 73 61 67 65 25 2c 20 | 23 30 0d 15 36 10 4d 4f |ssage%, |#0..6.MO|
|00004030| 56 53 20 50 43 2c 20 52 | 31 34 0d 15 40 04 0d 15 |VS PC, R|14..@...|
|00004040| 4a 1d 2e 6d 63 5f 70 75 | 74 5f 6e 65 78 74 5f 6f |J..mc_pu|t_next_o|
|00004050| 75 74 70 75 74 5f 62 79 | 74 65 25 0d 15 54 15 53 |utput_by|te%..T.S|
|00004060| 54 4d 46 44 20 52 31 33 | 21 2c 20 7b 52 31 34 7d |TMFD R13|!, {R14}|
|00004070| 0d 15 5e 2d 53 54 52 42 | 20 52 30 2c 20 5b 6d 63 |..^-STRB| R0, [mc|
|00004080| 72 5f 6f 75 74 70 75 74 | 5f 62 75 66 66 65 72 5f |r_output|_buffer_|
|00004090| 70 6f 69 6e 74 65 72 25 | 5d 2c 20 23 31 0d 15 68 |pointer%|], #1..h|
|000040a0| 3a 43 4d 50 20 6d 63 72 | 5f 6f 75 74 70 75 74 5f |:CMP mcr|_output_|
|000040b0| 62 75 66 66 65 72 5f 70 | 6f 69 6e 74 65 72 25 2c |buffer_p|ointer%,|
|000040c0| 20 6d 63 72 5f 6f 75 74 | 70 75 74 5f 62 75 66 66 | mcr_out|put_buff|
|000040d0| 65 72 5f 65 6e 64 25 0d | 15 72 20 42 4c 47 45 20 |er_end%.|.r BLGE |
|000040e0| 6d 63 5f 66 6c 75 73 68 | 5f 6f 75 74 70 75 74 5f |mc_flush|_output_|
|000040f0| 62 75 66 66 65 72 25 0d | 15 7c 15 4c 44 4d 46 44 |buffer%.|.|.LDMFD|
|00004100| 20 52 31 33 21 2c 20 7b | 50 43 7d 5e 0d 15 86 04 | R13!, {|PC}^....|
|00004110| 0d 15 90 1a 2e 6d 63 5f | 6c 6f 61 64 5f 69 6e 70 |.....mc_|load_inp|
|00004120| 75 74 5f 62 75 66 66 65 | 72 25 0d 15 9a 1c 53 54 |ut_buffe|r%....ST|
|00004130| 4d 46 44 20 52 31 33 21 | 2c 20 7b 52 30 2d 52 34 |MFD R13!|, {R0-R4|
|00004140| 2c 20 52 31 34 7d 0d 15 | a4 24 a4 6d 63 6d 5f 74 |, R14}..|.$.mcm_t|
|00004150| 72 61 63 65 5f 69 70 62 | 75 66 28 22 6f 6e 20 65 |race_ipb|uf("on e|
|00004160| 6e 74 72 79 22 2c 20 22 | 22 29 0d 15 ae 2a 4c 44 |ntry", "|")...*LD|
|00004170| 52 20 52 31 2c 20 6d 63 | 64 5f 69 6e 70 75 74 5f |R R1, mc|d_input_|
|00004180| 62 75 66 66 65 72 5f 70 | 68 79 73 69 63 61 6c 5f |buffer_p|hysical_|
|00004190| 65 6e 64 25 0d 15 b8 25 | 43 4d 50 20 6d 63 72 5f |end%...%|CMP mcr_|
|000041a0| 69 6e 70 75 74 5f 62 75 | 66 66 65 72 5f 70 6f 69 |input_bu|ffer_poi|
|000041b0| 6e 74 65 72 25 2c 20 52 | 31 0d 15 c2 23 42 47 45 |nter%, R|1...#BGE|
|000041c0| 20 6d 63 5f 6c 6f 61 64 | 5f 69 6e 70 75 74 5f 62 | mc_load|_input_b|
|000041d0| 75 66 66 65 72 5f 5f 73 | 65 65 6b 25 0d 15 cc 40 |uffer__s|eek%...@|
|000041e0| 43 4d 50 20 6d 63 72 5f | 69 6e 70 75 74 5f 62 75 |CMP mcr_|input_bu|
|000041f0| 66 66 65 72 5f 70 6f 69 | 6e 74 65 72 25 2c 20 6d |ffer_poi|nter%, m|
|00004200| 63 72 5f 69 6e 70 75 74 | 5f 62 75 66 66 65 72 5f |cr_input|_buffer_|
|00004210| 6c 6f 67 69 63 61 6c 5f | 65 6e 64 25 0d 15 d6 1e |logical_|end%....|
|00004220| 4c 44 4d 47 45 46 44 20 | 52 31 33 21 2c 20 7b 52 |LDMGEFD |R13!, {R|
|00004230| 30 2d 52 34 2c 20 52 31 | 34 7d 0d 15 e0 1f 84 52 |0-R4, R1|4}.....R|
|00004240| 47 45 53 20 50 43 2c 20 | 52 31 34 2c 20 23 63 61 |GES PC, |R14, #ca|
|00004250| 72 72 79 5f 66 6c 61 67 | 25 0d 15 ea 3a 43 4d 50 |rry_flag|%...:CMP|
|00004260| 20 6d 63 72 5f 69 6e 70 | 75 74 5f 62 75 66 66 65 | mcr_inp|ut_buffe|
|00004270| 72 5f 70 6f 69 6e 74 65 | 72 25 2c 20 6d 63 72 5f |r_pointe|r%, mcr_|
|00004280| 69 6e 70 75 74 5f 62 75 | 66 66 65 72 5f 73 74 61 |input_bu|ffer_sta|
|00004290| 72 74 25 0d 15 f4 1e 4c | 44 4d 47 45 46 44 20 52 |rt%....L|DMGEFD R|
|000042a0| 31 33 21 2c 20 7b 52 30 | 2d 52 34 2c 20 52 31 34 |13!, {R0|-R4, R14|
|000042b0| 7d 0d 15 fe 20 42 49 43 | 47 45 53 20 50 43 2c 20 |}... BIC|GES PC, |
|000042c0| 52 31 34 2c 20 23 63 61 | 72 72 79 5f 66 6c 61 67 |R14, #ca|rry_flag|
|000042d0| 25 0d 16 08 20 2e 6d 63 | 5f 6c 6f 61 64 5f 69 6e |%... .mc|_load_in|
|000042e0| 70 75 74 5f 62 75 66 66 | 65 72 5f 5f 73 65 65 6b |put_buff|er__seek|
|000042f0| 25 0d 16 12 22 4d 4f 56 | 20 52 30 2c 20 6d 63 72 |%..."MOV| R0, mcr|
|00004300| 5f 69 6e 70 75 74 5f 66 | 69 6c 65 5f 77 69 6e 64 |_input_f|ile_wind|
|00004310| 6f 77 25 0d 16 1c 3e 53 | 55 42 20 52 34 2c 20 6d |ow%...>S|UB R4, m|
|00004320| 63 72 5f 69 6e 70 75 74 | 5f 62 75 66 66 65 72 5f |cr_input|_buffer_|
|00004330| 70 6f 69 6e 74 65 72 25 | 2c 20 6d 63 72 5f 69 6e |pointer%|, mcr_in|
|00004340| 70 75 74 5f 62 75 66 66 | 65 72 5f 73 74 61 72 74 |put_buff|er_start|
|00004350| 25 0d 16 26 3a 41 44 44 | 20 6d 63 72 5f 69 6e 70 |%..&:ADD| mcr_inp|
|00004360| 75 74 5f 66 69 6c 65 5f | 77 69 6e 64 6f 77 25 2c |ut_file_|window%,|
|00004370| 20 6d 63 72 5f 69 6e 70 | 75 74 5f 66 69 6c 65 5f | mcr_inp|ut_file_|
|00004380| 77 69 6e 64 6f 77 25 2c | 20 52 34 0d 16 30 3a 4d |window%,| R4..0:M|
|00004390| 4f 56 20 6d 63 72 5f 69 | 6e 70 75 74 5f 62 75 66 |OV mcr_i|nput_buf|
|000043a0| 66 65 72 5f 70 6f 69 6e | 74 65 72 25 2c 20 6d 63 |fer_poin|ter%, mc|
|000043b0| 72 5f 69 6e 70 75 74 5f | 62 75 66 66 65 72 5f 73 |r_input_|buffer_s|
|000043c0| 74 61 72 74 25 0d 16 3a | 1a 4c 44 52 20 52 34 2c |tart%..:|.LDR R4,|
|000043d0| 20 6d 63 64 5f 61 6c 69 | 67 6e 6d 65 6e 74 25 0d | mcd_ali|gnment%.|
|000043e0| 16 44 27 42 49 43 20 52 | 31 34 2c 20 6d 63 72 5f |.D'BIC R|14, mcr_|
|000043f0| 69 6e 70 75 74 5f 66 69 | 6c 65 5f 77 69 6e 64 6f |input_fi|le_windo|
|00004400| 77 25 2c 20 52 34 0d 16 | 4e 41 53 55 42 20 6d 63 |w%, R4..|NASUB mc|
|00004410| 72 5f 69 6e 70 75 74 5f | 62 75 66 66 65 72 5f 70 |r_input_|buffer_p|
|00004420| 6f 69 6e 74 65 72 25 2c | 20 6d 63 72 5f 69 6e 70 |ointer%,| mcr_inp|
|00004430| 75 74 5f 62 75 66 66 65 | 72 5f 70 6f 69 6e 74 65 |ut_buffe|r_pointe|
|00004440| 72 25 2c 20 52 31 34 0d | 16 58 54 41 44 44 20 6d |r%, R14.|.XTADD m|
|00004450| 63 72 5f 69 6e 70 75 74 | 5f 62 75 66 66 65 72 5f |cr_input|_buffer_|
|00004460| 70 6f 69 6e 74 65 72 25 | 2c 20 6d 63 72 5f 69 6e |pointer%|, mcr_in|
|00004470| 70 75 74 5f 62 75 66 66 | 65 72 5f 70 6f 69 6e 74 |put_buff|er_point|
|00004480| 65 72 25 2c 20 6d 63 72 | 5f 69 6e 70 75 74 5f 66 |er%, mcr|_input_f|
|00004490| 69 6c 65 5f 77 69 6e 64 | 6f 77 25 0d 16 62 23 4d |ile_wind|ow%..b#M|
|000044a0| 4f 56 20 6d 63 72 5f 69 | 6e 70 75 74 5f 66 69 6c |OV mcr_i|nput_fil|
|000044b0| 65 5f 77 69 6e 64 6f 77 | 25 2c 20 52 31 34 0d 16 |e_window|%, R14..|
|000044c0| 6c 23 4d 4f 56 20 52 32 | 2c 20 6d 63 72 5f 69 6e |l#MOV R2|, mcr_in|
|000044d0| 70 75 74 5f 62 75 66 66 | 65 72 5f 73 74 61 72 74 |put_buff|er_start|
|000044e0| 25 0d 16 76 1c 4c 44 52 | 20 52 33 2c 20 6d 63 64 |%..v.LDR| R3, mcd|
|000044f0| 5f 62 75 66 66 65 72 5f | 73 69 7a 65 25 0d 16 80 |_buffer_|size%...|
|00004500| 27 53 55 42 53 20 52 30 | 2c 20 52 30 2c 20 6d 63 |'SUBS R0|, R0, mc|
|00004510| 72 5f 69 6e 70 75 74 5f | 66 69 6c 65 5f 77 69 6e |r_input_|file_win|
|00004520| 64 6f 77 25 0d 16 8a 25 | 42 4d 49 20 6d 63 5f 6c |dow%...%|BMI mc_l|
|00004530| 6f 61 64 5f 69 6e 70 75 | 74 5f 62 75 66 66 65 72 |oad_inpu|t_buffer|
|00004540| 5f 5f 64 69 73 63 6f 70 | 25 0d 16 94 0e 43 4d 50 |__discop|%....CMP|
|00004550| 20 52 30 2c 20 52 33 0d | 16 9e 47 4c 44 52 48 53 | R0, R3.|..GLDRHS|
|00004560| 20 6d 63 72 5f 69 6e 70 | 75 74 5f 62 75 66 66 65 | mcr_inp|ut_buffe|
|00004570| 72 5f 6c 6f 67 69 63 61 | 6c 5f 65 6e 64 25 2c 20 |r_logica|l_end%, |
|00004580| 6d 63 64 5f 69 6e 70 75 | 74 5f 62 75 66 66 65 72 |mcd_inpu|t_buffer|
|00004590| 5f 70 68 79 73 69 63 61 | 6c 5f 65 6e 64 25 0d 16 |_physica|l_end%..|
|000045a0| a8 25 42 48 53 20 6d 63 | 5f 6c 6f 61 64 5f 69 6e |.%BHS mc|_load_in|
|000045b0| 70 75 74 5f 62 75 66 66 | 65 72 5f 5f 64 69 73 63 |put_buff|er__disc|
|000045c0| 6f 70 25 0d 16 b2 19 a4 | 6d 63 6d 5f 74 72 61 63 |op%.....|mcm_trac|
|000045d0| 65 5f 69 70 62 6d 6f 76 | 65 28 30 29 0d 16 bc 29 |e_ipbmov|e(0)...)|
|000045e0| 4d 4f 56 20 52 33 2c 20 | 6d 63 72 5f 69 6e 70 75 |MOV R3, |mcr_inpu|
|000045f0| 74 5f 62 75 66 66 65 72 | 5f 6c 6f 67 69 63 61 6c |t_buffer|_logical|
|00004600| 5f 65 6e 64 25 0d 16 c6 | 48 41 44 44 20 6d 63 72 |_end%...|HADD mcr|
|00004610| 5f 69 6e 70 75 74 5f 62 | 75 66 66 65 72 5f 6c 6f |_input_b|uffer_lo|
|00004620| 67 69 63 61 6c 5f 65 6e | 64 25 2c 20 6d 63 72 5f |gical_en|d%, mcr_|
|00004630| 69 6e 70 75 74 5f 62 75 | 66 66 65 72 5f 6c 6f 67 |input_bu|ffer_log|
|00004640| 69 63 61 6c 5f 65 6e 64 | 25 2c 20 52 30 0d 16 d0 |ical_end|%, R0...|
|00004650| 29 43 4d 50 20 52 31 2c | 20 6d 63 72 5f 69 6e 70 |)CMP R1,| mcr_inp|
|00004660| 75 74 5f 62 75 66 66 65 | 72 5f 6c 6f 67 69 63 61 |ut_buffe|r_logica|
|00004670| 6c 5f 65 6e 64 25 0d 16 | da 2b 4d 4f 56 4c 4f 20 |l_end%..|.+MOVLO |
|00004680| 6d 63 72 5f 69 6e 70 75 | 74 5f 62 75 66 66 65 72 |mcr_inpu|t_buffer|
|00004690| 5f 6c 6f 67 69 63 61 6c | 5f 65 6e 64 25 2c 20 52 |_logical|_end%, R|
|000046a0| 31 0d 16 e4 27 53 55 42 | 20 52 33 2c 20 52 33 2c |1...'SUB| R3, R3,|
|000046b0| 20 6d 63 72 5f 69 6e 70 | 75 74 5f 62 75 66 66 65 | mcr_inp|ut_buffe|
|000046c0| 72 5f 73 74 61 72 74 25 | 0d 16 ee 12 41 44 44 20 |r_start%|....ADD |
|000046d0| 52 33 2c 20 52 33 2c 20 | 52 30 0d 16 f8 12 84 52 |R3, R3, |R0.....R|
|000046e0| 20 52 33 2c 20 52 33 2c | 20 23 33 31 0d 17 02 12 | R3, R3,| #31....|
|000046f0| 41 44 44 20 52 33 2c 20 | 52 33 2c 20 23 31 0d 17 |ADD R3, |R3, #1..|
|00004700| 0c 27 41 44 44 20 52 33 | 2c 20 52 33 2c 20 6d 63 |.'ADD R3|, R3, mc|
|00004710| 72 5f 69 6e 70 75 74 5f | 62 75 66 66 65 72 5f 73 |r_input_|buffer_s|
|00004720| 74 61 72 74 25 0d 17 16 | 0e 43 4d 50 20 52 31 2c |tart%...|.CMP R1,|
|00004730| 20 52 33 0d 17 20 10 4d | 4f 56 48 49 20 52 31 2c | R3.. .M|OVHI R1,|
|00004740| 20 52 33 0d 17 2a 1b 53 | 54 4d 46 44 20 52 31 33 | R3..*.S|TMFD R13|
|00004750| 21 2c 20 7b 52 30 2c 20 | 52 32 2d 52 39 7d 0d 17 |!, {R0, |R2-R9}..|
|00004760| 34 12 53 55 42 20 52 30 | 2c 20 52 31 2c 20 52 30 |4.SUB R0|, R1, R0|
|00004770| 0d 17 3e 19 a4 6d 63 6d | 5f 74 72 61 63 65 5f 69 |..>..mcm|_trace_i|
|00004780| 70 62 6d 6f 76 65 28 31 | 29 0d 17 48 25 2e 6d 63 |pbmove(1|)..H%.mc|
|00004790| 5f 6c 6f 61 64 5f 69 6e | 70 75 74 5f 62 75 66 66 |_load_in|put_buff|
|000047a0| 65 72 5f 5f 6d 6f 76 65 | 5f 6c 6f 6f 70 25 0d 17 |er__move|_loop%..|
|000047b0| 52 16 4c 44 4d 44 42 20 | 52 30 21 2c 20 7b 52 32 |R.LDMDB |R0!, {R2|
|000047c0| 2d 52 39 7d 0d 17 5c 16 | 53 54 4d 44 42 20 52 31 |-R9}..\.|STMDB R1|
|000047d0| 21 2c 20 7b 52 32 2d 52 | 39 7d 0d 17 66 23 43 4d |!, {R2-R|9}..f#CM|
|000047e0| 50 20 52 30 2c 20 6d 63 | 72 5f 69 6e 70 75 74 5f |P R0, mc|r_input_|
|000047f0| 62 75 66 66 65 72 5f 73 | 74 61 72 74 25 0d 17 70 |buffer_s|tart%..p|
|00004800| 28 42 48 49 20 6d 63 5f | 6c 6f 61 64 5f 69 6e 70 |(BHI mc_|load_inp|
|00004810| 75 74 5f 62 75 66 66 65 | 72 5f 5f 6d 6f 76 65 5f |ut_buffe|r__move_|
|00004820| 6c 6f 6f 70 25 0d 17 7a | 19 a4 6d 63 6d 5f 74 72 |loop%..z|..mcm_tr|
|00004830| 61 63 65 5f 69 70 62 6d | 6f 76 65 28 32 29 0d 17 |ace_ipbm|ove(2)..|
|00004840| 84 1b 4c 44 4d 46 44 20 | 52 31 33 21 2c 20 7b 52 |..LDMFD |R13!, {R|
|00004850| 30 2c 20 52 32 2d 52 39 | 7d 0d 17 8e 0e 4d 4f 56 |0, R2-R9|}....MOV|
|00004860| 20 52 33 2c 20 52 30 0d | 17 98 22 2e 6d 63 5f 6c | R3, R0.|..".mc_l|
|00004870| 6f 61 64 5f 69 6e 70 75 | 74 5f 62 75 66 66 65 72 |oad_inpu|t_buffer|
|00004880| 5f 5f 64 69 73 63 6f 70 | 25 0d 17 a2 2c a4 6d 63 |__discop|%...,.mc|
|00004890| 6d 5f 74 72 61 63 65 5f | 69 70 62 75 66 28 22 61 |m_trace_|ipbuf("a|
|000048a0| 66 74 65 72 20 61 64 6a | 75 73 74 6d 65 6e 74 22 |fter adj|ustment"|
|000048b0| 2c 20 22 22 29 0d 17 ac | 0e 4d 4f 56 20 52 30 2c |, "")...|.MOV R0,|
|000048c0| 20 23 33 0d 17 b6 22 4c | 44 52 20 52 31 2c 20 6d | #3..."L|DR R1, m|
|000048d0| 63 64 5f 69 6e 70 75 74 | 5f 66 69 6c 65 5f 68 61 |cd_input|_file_ha|
|000048e0| 6e 64 6c 65 25 0d 17 c0 | 23 4d 4f 56 20 52 32 2c |ndle%...|#MOV R2,|
|000048f0| 20 6d 63 72 5f 69 6e 70 | 75 74 5f 62 75 66 66 65 | mcr_inp|ut_buffe|
|00004900| 72 5f 73 74 61 72 74 25 | 0d 17 ca 1d 3b 4c 44 52 |r_start%|....;LDR|
|00004910| 20 52 33 2c 20 6d 63 64 | 5f 62 75 66 66 65 72 5f | R3, mcd|_buffer_|
|00004920| 73 69 7a 65 25 0d 17 d4 | 22 4d 4f 56 20 52 34 2c |size%...|"MOV R4,|
|00004930| 20 6d 63 72 5f 69 6e 70 | 75 74 5f 66 69 6c 65 5f | mcr_inp|ut_file_|
|00004940| 77 69 6e 64 6f 77 25 0d | 17 de 12 53 57 49 20 22 |window%.|...SWI "|
|00004950| 58 4f 53 5f 47 42 50 42 | 22 0d 17 e8 17 42 56 53 |XOS_GBPB|"....BVS|
|00004960| 20 6d 63 5f 66 61 74 61 | 6c 5f 65 72 72 6f 72 25 | mc_fata|l_error%|
|00004970| 0d 17 f2 4a 53 55 42 43 | 53 20 6d 63 72 5f 69 6e |...JSUBC|S mcr_in|
|00004980| 70 75 74 5f 62 75 66 66 | 65 72 5f 6c 6f 67 69 63 |put_buff|er_logic|
|00004990| 61 6c 5f 65 6e 64 25 2c | 20 6d 63 72 5f 69 6e 70 |al_end%,| mcr_inp|
|000049a0| 75 74 5f 62 75 66 66 65 | 72 5f 6c 6f 67 69 63 61 |ut_buffe|r_logica|
|000049b0| 6c 5f 65 6e 64 25 2c 20 | 52 33 0d 17 fc 24 a4 6d |l_end%, |R3...$.m|
|000049c0| 63 6d 5f 74 72 61 63 65 | 5f 69 70 62 75 66 28 22 |cm_trace|_ipbuf("|
|000049d0| 6f 6e 20 65 78 69 74 22 | 2c 20 22 74 22 29 0d 18 |on exit"|, "t")..|
|000049e0| 06 1c 4c 44 4d 46 44 20 | 52 31 33 21 2c 20 7b 52 |..LDMFD |R13!, {R|
|000049f0| 30 2d 52 34 2c 20 52 31 | 34 7d 0d 18 10 40 43 4d |0-R4, R1|4}...@CM|
|00004a00| 50 20 6d 63 72 5f 69 6e | 70 75 74 5f 62 75 66 66 |P mcr_in|put_buff|
|00004a10| 65 72 5f 70 6f 69 6e 74 | 65 72 25 2c 20 6d 63 72 |er_point|er%, mcr|
|00004a20| 5f 69 6e 70 75 74 5f 62 | 75 66 66 65 72 5f 6c 6f |_input_b|uffer_lo|
|00004a30| 67 69 63 61 6c 5f 65 6e | 64 25 0d 18 1a 20 42 49 |gical_en|d%... BI|
|00004a40| 43 4c 54 53 20 50 43 2c | 20 52 31 34 2c 20 23 63 |CLTS PC,| R14, #c|
|00004a50| 61 72 72 79 5f 66 6c 61 | 67 25 0d 18 24 1d 84 52 |arry_fla|g%..$..R|
|00004a60| 53 20 50 43 2c 20 52 31 | 34 2c 20 23 63 61 72 72 |S PC, R1|4, #carr|
|00004a70| 79 5f 66 6c 61 67 25 0d | 18 2e 04 0d 18 38 1c 2e |y_flag%.|.....8..|
|00004a80| 6d 63 5f 66 6c 75 73 68 | 5f 6f 75 74 70 75 74 5f |mc_flush|_output_|
|00004a90| 62 75 66 66 65 72 25 0d | 18 42 1c 53 54 4d 46 44 |buffer%.|.B.STMFD|
|00004aa0| 20 52 31 33 21 2c 20 7b | 52 30 2d 52 34 2c 20 52 | R13!, {|R0-R4, R|
|00004ab0| 31 34 7d 0d 18 4c 23 a4 | 6d 63 6d 5f 74 72 61 63 |14}..L#.|mcm_trac|
|00004ac0| 65 5f 6f 70 62 75 66 28 | 22 6f 6e 20 65 6e 74 72 |e_opbuf(|"on entr|
|00004ad0| 79 22 2c 20 a3 29 0d 18 | 56 0e 4d 4f 56 20 52 30 |y", .)..|V.MOV R0|
|00004ae0| 2c 20 23 31 0d 18 60 23 | 4c 44 52 20 52 31 2c 20 |, #1..`#|LDR R1, |
|00004af0| 6d 63 64 5f 6f 75 74 70 | 75 74 5f 66 69 6c 65 5f |mcd_outp|ut_file_|
|00004b00| 68 61 6e 64 6c 65 25 0d | 18 6a 24 4c 44 52 20 52 |handle%.|.j$LDR R|
|00004b10| 32 2c 20 6d 63 64 5f 6f | 75 74 70 75 74 5f 62 75 |2, mcd_o|utput_bu|
|00004b20| 66 66 65 72 5f 73 74 61 | 72 74 25 0d 18 74 40 53 |ffer_sta|rt%..t@S|
|00004b30| 55 42 20 52 33 2c 20 6d | 63 72 5f 6f 75 74 70 75 |UB R3, m|cr_outpu|
|00004b40| 74 5f 62 75 66 66 65 72 | 5f 70 6f 69 6e 74 65 72 |t_buffer|_pointer|
|00004b50| 25 2c 20 6d 63 72 5f 6f | 75 74 70 75 74 5f 62 75 |%, mcr_o|utput_bu|
|00004b60| 66 66 65 72 5f 73 74 61 | 72 74 25 0d 18 7e 23 4d |ffer_sta|rt%..~#M|
|00004b70| 4f 56 20 52 34 2c 20 6d | 63 72 5f 6f 75 74 70 75 |OV R4, m|cr_outpu|
|00004b80| 74 5f 66 69 6c 65 5f 77 | 69 6e 64 6f 77 25 0d 18 |t_file_w|indow%..|
|00004b90| 88 12 53 57 49 20 22 58 | 4f 53 5f 47 42 50 42 22 |..SWI "X|OS_GBPB"|
|00004ba0| 0d 18 92 17 42 56 53 20 | 6d 63 5f 66 61 74 61 6c |....BVS |mc_fatal|
|00004bb0| 5f 65 72 72 6f 72 25 0d | 18 9c 54 41 44 44 20 6d |_error%.|..TADD m|
|00004bc0| 63 72 5f 6f 75 74 70 75 | 74 5f 66 69 6c 65 5f 77 |cr_outpu|t_file_w|
|00004bd0| 69 6e 64 6f 77 25 2c 20 | 6d 63 72 5f 6f 75 74 70 |indow%, |mcr_outp|
|00004be0| 75 74 5f 66 69 6c 65 5f | 77 69 6e 64 6f 77 25 2c |ut_file_|window%,|
|00004bf0| 20 6d 63 72 5f 6f 75 74 | 70 75 74 5f 62 75 66 66 | mcr_out|put_buff|
|00004c00| 65 72 5f 70 6f 69 6e 74 | 65 72 25 0d 18 a6 52 53 |er_point|er%...RS|
|00004c10| 55 42 20 6d 63 72 5f 6f | 75 74 70 75 74 5f 66 69 |UB mcr_o|utput_fi|
|00004c20| 6c 65 5f 77 69 6e 64 6f | 77 25 2c 20 6d 63 72 5f |le_windo|w%, mcr_|
|00004c30| 6f 75 74 70 75 74 5f 66 | 69 6c 65 5f 77 69 6e 64 |output_f|ile_wind|
|00004c40| 6f 77 25 2c 20 6d 63 72 | 5f 6f 75 74 70 75 74 5f |ow%, mcr|_output_|
|00004c50| 62 75 66 66 65 72 5f 73 | 74 61 72 74 25 0d 18 b0 |buffer_s|tart%...|
|00004c60| 3c 53 55 42 20 6d 63 72 | 5f 6f 75 74 70 75 74 5f |<SUB mcr|_output_|
|00004c70| 66 69 6c 65 5f 77 69 6e | 64 6f 77 25 2c 20 6d 63 |file_win|dow%, mc|
|00004c80| 72 5f 6f 75 74 70 75 74 | 5f 66 69 6c 65 5f 77 69 |r_output|_file_wi|
|00004c90| 6e 64 6f 77 25 2c 20 52 | 33 0d 18 ba 3c 4d 4f 56 |ndow%, R|3...<MOV|
|00004ca0| 20 6d 63 72 5f 6f 75 74 | 70 75 74 5f 62 75 66 66 | mcr_out|put_buff|
|00004cb0| 65 72 5f 70 6f 69 6e 74 | 65 72 25 2c 20 6d 63 72 |er_point|er%, mcr|
|00004cc0| 5f 6f 75 74 70 75 74 5f | 62 75 66 66 65 72 5f 73 |_output_|buffer_s|
|00004cd0| 74 61 72 74 25 0d 18 c4 | 2a 41 44 52 43 53 20 52 |tart%...|*ADRCS R|
|00004ce0| 30 2c 20 6d 63 5f 66 6c | 75 73 68 5f 6f 75 74 70 |0, mc_fl|ush_outp|
|00004cf0| 75 74 5f 62 75 66 66 65 | 72 5f 5f 65 72 72 25 0d |ut_buffe|r__err%.|
|00004d00| 18 ce 11 42 43 53 20 6d | 63 5f 65 72 72 6f 72 25 |...BCS m|c_error%|
|00004d10| 0d 18 d8 22 a4 6d 63 6d | 5f 74 72 61 63 65 5f 6f |...".mcm|_trace_o|
|00004d20| 70 62 75 66 28 22 6f 6e | 20 65 78 69 74 22 2c 20 |pbuf("on| exit", |
|00004d30| a3 29 0d 18 e2 1c 4c 44 | 4d 46 44 20 52 31 33 21 |.)....LD|MFD R13!|
|00004d40| 2c 20 7b 52 30 2d 52 34 | 2c 20 50 43 7d 5e 0d 18 |, {R0-R4|, PC}^..|
|00004d50| ec 21 2e 6d 63 5f 66 6c | 75 73 68 5f 6f 75 74 70 |.!.mc_fl|ush_outp|
|00004d60| 75 74 5f 62 75 66 66 65 | 72 5f 5f 65 72 72 25 0d |ut_buffe|r__err%.|
|00004d70| 18 f6 2d 45 51 55 53 20 | 22 63 61 6e 6e 6f 74 20 |..-EQUS |"cannot |
|00004d80| 77 72 69 74 65 20 74 6f | 20 6f 75 74 70 75 74 20 |write to| output |
|00004d90| 66 69 6c 65 22 20 2b 20 | bd 28 30 29 0d 19 00 09 |file" + |.(0)....|
|00004da0| 41 4c 49 47 4e 0d 19 0a | 04 0d 19 14 1f 2e 6d 63 |ALIGN...|......mc|
|00004db0| 5f 66 69 6e 64 5f 6d 65 | 73 73 61 67 65 5f 73 65 |_find_me|ssage_se|
|00004dc0| 70 61 72 61 74 6f 72 25 | 0d 19 1e 1c 53 54 4d 46 |parator%|....STMF|
|00004dd0| 44 20 52 31 33 21 2c 20 | 7b 52 30 2d 52 32 2c 20 |D R13!, |{R0-R2, |
|00004de0| 52 31 34 7d 0d 19 28 27 | 41 44 52 20 52 32 2c 20 |R14}..('|ADR R2, |
|00004df0| 6d 63 64 5f 6e 65 77 73 | 5f 6d 65 73 73 61 67 65 |mcd_news|_message|
|00004e00| 5f 73 65 70 61 72 61 74 | 6f 72 25 0d 19 32 15 4c |_separat|or%..2.L|
|00004e10| 44 52 42 20 52 31 2c 20 | 5b 52 32 5d 2c 20 23 31 |DRB R1, |[R2], #1|
|00004e20| 0d 19 3c 27 43 4d 50 20 | 6d 63 72 5f 65 6e 64 5f |..<'CMP |mcr_end_|
|00004e30| 6f 66 5f 63 75 72 72 65 | 6e 74 5f 6d 65 73 73 61 |of_curre|nt_messa|
|00004e40| 67 65 25 2c 20 23 30 0d | 19 46 17 4c 44 52 45 51 |ge%, #0.|.F.LDREQ|
|00004e50| 42 20 52 31 2c 20 5b 52 | 32 5d 2c 20 23 31 0d 19 |B R1, [R|2], #1..|
|00004e60| 50 26 2e 6d 63 5f 66 69 | 6e 64 5f 6d 65 73 73 61 |P&.mc_fi|nd_messa|
|00004e70| 67 65 5f 73 65 70 61 72 | 61 74 6f 72 5f 5f 6c 6f |ge_separ|ator__lo|
|00004e80| 6f 70 31 25 0d 19 5a 1c | a4 6d 63 6d 5f 67 65 74 |op1%..Z.|.mcm_get|
|00004e90| 5f 6e 65 78 74 5f 69 6e | 70 75 74 5f 62 79 74 65 |_next_in|put_byte|
|00004ea0| 0d 19 64 1b a4 6d 63 6d | 5f 74 72 61 63 65 5f 6d |..d..mcm|_trace_m|
|00004eb0| 73 67 5f 73 65 70 28 22 | 43 22 29 0d 19 6e 27 2e |sg_sep("|C")..n'.|
|00004ec0| 6d 63 5f 66 69 6e 64 5f | 6d 65 73 73 61 67 65 5f |mc_find_|message_|
|00004ed0| 73 65 70 61 72 61 74 6f | 72 5f 5f 6c 6f 6f 70 31 |separato|r__loop1|
|00004ee0| 61 25 0d 19 78 27 42 43 | 53 20 6d 63 5f 66 69 6e |a%..x'BC|S mc_fin|
|00004ef0| 64 5f 6d 65 73 73 61 67 | 65 5f 73 65 70 61 72 61 |d_messag|e_separa|
|00004f00| 74 6f 72 5f 5f 65 6f 66 | 25 0d 19 82 0e 43 4d 50 |tor__eof|%....CMP|
|00004f10| 20 52 30 2c 20 52 31 0d | 19 8c 29 42 4e 45 20 6d | R0, R1.|..)BNE m|
|00004f20| 63 5f 66 69 6e 64 5f 6d | 65 73 73 61 67 65 5f 73 |c_find_m|essage_s|
|00004f30| 65 70 61 72 61 74 6f 72 | 5f 5f 6c 6f 6f 70 31 25 |eparator|__loop1%|
|00004f40| 0d 19 96 1b a4 6d 63 6d | 5f 74 72 61 63 65 5f 6d |.....mcm|_trace_m|
|00004f50| 73 67 5f 73 65 70 28 22 | 4e 22 29 0d 19 a0 56 41 |sg_sep("|N")...VA|
|00004f60| 44 44 20 6d 63 72 5f 65 | 6e 64 5f 6f 66 5f 63 75 |DD mcr_e|nd_of_cu|
|00004f70| 72 72 65 6e 74 5f 6d 65 | 73 73 61 67 65 25 2c 20 |rrent_me|ssage%, |
|00004f80| 6d 63 72 5f 69 6e 70 75 | 74 5f 66 69 6c 65 5f 77 |mcr_inpu|t_file_w|
|00004f90| 69 6e 64 6f 77 25 2c 20 | 6d 63 72 5f 69 6e 70 75 |indow%, |mcr_inpu|
|00004fa0| 74 5f 62 75 66 66 65 72 | 5f 70 6f 69 6e 74 65 72 |t_buffer|_pointer|
|00004fb0| 25 0d 19 aa 26 2e 6d 63 | 5f 66 69 6e 64 5f 6d 65 |%...&.mc|_find_me|
|00004fc0| 73 73 61 67 65 5f 73 65 | 70 61 72 61 74 6f 72 5f |ssage_se|parator_|
|00004fd0| 5f 6c 6f 6f 70 32 25 0d | 19 b4 1c a4 6d 63 6d 5f |_loop2%.|....mcm_|
|00004fe0| 67 65 74 5f 6e 65 78 74 | 5f 69 6e 70 75 74 5f 62 |get_next|_input_b|
|00004ff0| 79 74 65 0d 19 be 1b a4 | 6d 63 6d 5f 74 72 61 63 |yte.....|mcm_trac|
|00005000| 65 5f 6d 73 67 5f 73 65 | 70 28 22 43 22 29 0d 19 |e_msg_se|p("C")..|
|00005010| c8 27 42 43 53 20 6d 63 | 5f 66 69 6e 64 5f 6d 65 |.'BCS mc|_find_me|
|00005020| 73 73 61 67 65 5f 73 65 | 70 61 72 61 74 6f 72 5f |ssage_se|parator_|
|00005030| 5f 65 6f 66 25 0d 19 d2 | 15 4c 44 52 42 20 52 31 |_eof%...|.LDRB R1|
|00005040| 2c 20 5b 52 32 5d 2c 20 | 23 31 0d 19 dc 0e 43 4d |, [R2], |#1....CM|
|00005050| 50 20 52 31 2c 20 23 30 | 0d 19 e6 29 42 45 51 20 |P R1, #0|...)BEQ |
|00005060| 6d 63 5f 66 69 6e 64 5f | 6d 65 73 73 61 67 65 5f |mc_find_|message_|
|00005070| 73 65 70 61 72 61 74 6f | 72 5f 5f 66 6f 75 6e 64 |separato|r__found|
|00005080| 25 0d 19 f0 0e 43 4d 50 | 20 52 30 2c 20 52 31 0d |%....CMP| R0, R1.|
|00005090| 19 fa 29 42 45 51 20 6d | 63 5f 66 69 6e 64 5f 6d |..)BEQ m|c_find_m|
|000050a0| 65 73 73 61 67 65 5f 73 | 65 70 61 72 61 74 6f 72 |essage_s|eparator|
|000050b0| 5f 5f 6c 6f 6f 70 32 25 | 0d 1a 04 27 41 44 52 20 |__loop2%|...'ADR |
|000050c0| 52 32 2c 20 6d 63 64 5f | 6e 65 77 73 5f 6d 65 73 |R2, mcd_|news_mes|
|000050d0| 73 61 67 65 5f 73 65 70 | 61 72 61 74 6f 72 25 0d |sage_sep|arator%.|
|000050e0| 1a 0e 15 4c 44 52 42 20 | 52 31 2c 20 5b 52 32 5d |...LDRB |R1, [R2]|
|000050f0| 2c 20 23 31 0d 1a 18 11 | 54 45 51 43 53 50 20 50 |, #1....|TEQCSP P|
|00005100| 43 2c 20 23 30 0d 1a 22 | 28 42 20 6d 63 5f 66 69 |C, #0.."|(B mc_fi|
|00005110| 6e 64 5f 6d 65 73 73 61 | 67 65 5f 73 65 70 61 72 |nd_messa|ge_separ|
|00005120| 61 74 6f 72 5f 5f 6c 6f | 6f 70 31 61 25 0d 1a 2c |ator__lo|op1a%..,|
|00005130| 26 2e 6d 63 5f 66 69 6e | 64 5f 6d 65 73 73 61 67 |&.mc_fin|d_messag|
|00005140| 65 5f 73 65 70 61 72 61 | 74 6f 72 5f 5f 66 6f 75 |e_separa|tor__fou|
|00005150| 6e 64 25 0d 1a 36 16 43 | 4d 50 20 52 30 2c 20 23 |nd%..6.C|MP R0, #|
|00005160| 6e 65 77 73 5f 65 6f 6c | 25 0d 1a 40 26 42 45 51 |news_eol|%..@&BEQ|
|00005170| 20 6d 63 5f 66 69 6e 64 | 5f 6d 65 73 73 61 67 65 | mc_find|_message|
|00005180| 5f 73 65 70 61 72 61 74 | 6f 72 5f 65 6f 6d 25 0d |_separat|or_eom%.|
|00005190| 1a 4a 1c a4 6d 63 6d 5f | 67 65 74 5f 6e 65 78 74 |.J..mcm_|get_next|
|000051a0| 5f 69 6e 70 75 74 5f 62 | 79 74 65 0d 1a 54 27 42 |_input_b|yte..T'B|
|000051b0| 20 6d 63 5f 66 69 6e 64 | 5f 6d 65 73 73 61 67 65 | mc_find|_message|
|000051c0| 5f 73 65 70 61 72 61 74 | 6f 72 5f 5f 66 6f 75 6e |_separat|or__foun|
|000051d0| 64 25 0d 1a 5e 23 2e 6d | 63 5f 66 69 6e 64 5f 6d |d%..^#.m|c_find_m|
|000051e0| 65 73 73 61 67 65 5f 73 | 65 70 61 72 61 74 6f 72 |essage_s|eparator|
|000051f0| 5f 65 6f 6d 25 0d 1a 68 | 55 41 44 44 20 6d 63 72 |_eom%..h|UADD mcr|
|00005200| 5f 73 74 61 72 74 5f 6f | 66 5f 6e 65 78 74 5f 6d |_start_o|f_next_m|
|00005210| 65 73 73 61 67 65 25 2c | 20 6d 63 72 5f 69 6e 70 |essage%,| mcr_inp|
|00005220| 75 74 5f 66 69 6c 65 5f | 77 69 6e 64 6f 77 25 2c |ut_file_|window%,|
|00005230| 20 6d 63 72 5f 69 6e 70 | 75 74 5f 62 75 66 66 65 | mcr_inp|ut_buffe|
|00005240| 72 5f 70 6f 69 6e 74 65 | 72 25 0d 1a 72 1c 4c 44 |r_pointe|r%..r.LD|
|00005250| 4d 46 44 20 52 31 33 21 | 2c 20 7b 52 30 2d 52 32 |MFD R13!|, {R0-R2|
|00005260| 2c 20 52 31 34 7d 0d 1a | 7c 1e 42 49 43 53 20 50 |, R14}..||.BICS P|
|00005270| 43 2c 20 52 31 34 2c 20 | 23 63 61 72 72 79 5f 66 |C, R14, |#carry_f|
|00005280| 6c 61 67 25 0d 1a 86 24 | 2e 6d 63 5f 66 69 6e 64 |lag%...$|.mc_find|
|00005290| 5f 6d 65 73 73 61 67 65 | 5f 73 65 70 61 72 61 74 |_message|_separat|
|000052a0| 6f 72 5f 5f 65 6f 66 25 | 0d 1a 90 56 41 44 44 20 |or__eof%|...VADD |
|000052b0| 6d 63 72 5f 65 6e 64 5f | 6f 66 5f 63 75 72 72 65 |mcr_end_|of_curre|
|000052c0| 6e 74 5f 6d 65 73 73 61 | 67 65 25 2c 20 6d 63 72 |nt_messa|ge%, mcr|
|000052d0| 5f 69 6e 70 75 74 5f 66 | 69 6c 65 5f 77 69 6e 64 |_input_f|ile_wind|
|000052e0| 6f 77 25 2c 20 6d 63 72 | 5f 69 6e 70 75 74 5f 62 |ow%, mcr|_input_b|
|000052f0| 75 66 66 65 72 5f 70 6f | 69 6e 74 65 72 25 0d 1a |uffer_po|inter%..|
|00005300| 9a 26 4d 56 4e 20 6d 63 | 72 5f 73 74 61 72 74 5f |.&MVN mc|r_start_|
|00005310| 6f 66 5f 6e 65 78 74 5f | 6d 65 73 73 61 67 65 25 |of_next_|message%|
|00005320| 2c 20 23 30 0d 1a a4 1c | 4c 44 4d 46 44 20 52 31 |, #0....|LDMFD R1|
|00005330| 33 21 2c 20 7b 52 30 2d | 52 32 2c 20 52 31 34 7d |3!, {R0-|R2, R14}|
|00005340| 0d 1a ae 1d 84 52 53 20 | 50 43 2c 20 52 31 34 2c |.....RS |PC, R14,|
|00005350| 20 23 63 61 72 72 79 5f | 66 6c 61 67 25 0d 1a b8 | #carry_|flag%...|
|00005360| 04 0d 1a c2 20 2e 6d 63 | 64 5f 6e 65 77 73 5f 6d |.... .mc|d_news_m|
|00005370| 65 73 73 61 67 65 5f 73 | 65 70 61 72 61 74 6f 72 |essage_s|eparator|
|00005380| 25 0d 1a cc 29 45 51 55 | 53 20 bd 28 6e 65 77 73 |%...)EQU|S .(news|
|00005390| 5f 65 6f 6c 25 29 20 2b | 20 22 23 21 20 72 6e 65 |_eol%) +| "#! rne|
|000053a0| 77 73 22 20 2b 20 bd 28 | 30 29 0d 1a d6 09 41 4c |ws" + .(|0)....AL|
|000053b0| 49 47 4e 0d 1a e0 04 0d | 1a ea 19 2e 6d 63 5f 74 |IGN.....|....mc_t|
|000053c0| 72 61 6e 73 66 65 72 5f | 6d 65 73 73 61 67 65 25 |ransfer_|message%|
|000053d0| 0d 1a f4 1c 53 54 4d 46 | 44 20 52 31 33 21 2c 20 |....STMF|D R13!, |
|000053e0| 7b 52 30 2d 52 31 2c 20 | 52 31 34 7d 0d 1a fe 29 |{R0-R1, |R14}...)|
|000053f0| 43 4d 50 20 6d 63 72 5f | 73 74 61 72 74 5f 6f 66 |CMP mcr_|start_of|
|00005400| 5f 63 75 72 72 65 6e 74 | 5f 6d 65 73 73 61 67 65 |_current|_message|
|00005410| 25 2c 20 23 30 0d 1b 08 | 40 ec 51 20 6d 63 72 5f |%, #0...|@.Q mcr_|
|00005420| 73 74 61 72 74 5f 6f 66 | 5f 63 75 72 72 65 6e 74 |start_of|_current|
|00005430| 5f 6d 65 73 73 61 67 65 | 25 2c 20 6d 63 72 5f 73 |_message|%, mcr_s|
|00005440| 74 61 72 74 5f 6f 66 5f | 6e 65 78 74 5f 6d 65 73 |tart_of_|next_mes|
|00005450| 73 61 67 65 25 0d 1b 12 | 1e 4c 44 4d 45 51 46 44 |sage%...|.LDMEQFD|
|00005460| 20 52 31 33 21 2c 20 7b | 52 30 2d 52 31 2c 20 50 | R13!, {|R0-R1, P|
|00005470| 43 7d 5e 0d 1b 1c 1f 42 | 4c 20 6d 63 5f 74 72 61 |C}^....B|L mc_tra|
|00005480| 6e 73 66 65 72 5f 6e 65 | 77 73 5f 68 65 61 64 65 |nsfer_ne|ws_heade|
|00005490| 72 25 0d 1b 26 1d 42 4c | 20 6d 63 5f 74 72 61 6e |r%..&.BL| mc_tran|
|000054a0| 73 66 65 72 5f 6e 65 77 | 73 5f 62 6f 64 79 25 0d |sfer_new|s_body%.|
|000054b0| 1b 30 1c 4c 44 4d 46 44 | 20 52 31 33 21 2c 20 7b |.0.LDMFD| R13!, {|
|000054c0| 52 30 2d 52 31 2c 20 50 | 43 7d 5e 0d 1b 3a 04 0d |R0-R1, P|C}^..:..|
|000054d0| 1b 44 1d 2e 6d 63 5f 74 | 72 61 6e 73 66 65 72 5f |.D..mc_t|ransfer_|
|000054e0| 6e 65 77 73 5f 68 65 61 | 64 65 72 25 0d 1b 4e 1c |news_hea|der%..N.|
|000054f0| 53 54 4d 46 44 20 52 31 | 33 21 2c 20 7b 52 30 2d |STMFD R1|3!, {R0-|
|00005500| 52 32 2c 20 52 31 34 7d | 0d 1b 58 17 a4 6d 63 6d |R2, R14}|..X..mcm|
|00005510| 5f 74 72 61 63 65 5f 6e | 65 77 73 5f 68 64 72 0d |_trace_n|ews_hdr.|
|00005520| 1b 62 27 41 44 52 20 52 | 31 2c 20 6d 63 64 5f 6e |.b'ADR R|1, mcd_n|
|00005530| 65 77 73 5f 6d 65 73 73 | 61 67 65 5f 73 65 70 61 |ews_mess|age_sepa|
|00005540| 72 61 74 6f 72 25 0d 1b | 6c 20 2e 6d 63 5f 74 72 |rator%..|l .mc_tr|
|00005550| 61 6e 73 66 65 72 5f 6d | 65 73 73 61 67 65 5f 5f |ansfer_m|essage__|
|00005560| 6c 6f 6f 70 31 25 0d 1b | 76 16 4c 44 52 42 20 52 |loop1%..|v.LDRB R|
|00005570| 30 2c 20 5b 52 31 2c 20 | 23 31 5d 21 0d 1b 80 0e |0, [R1, |#1]!....|
|00005580| 43 4d 50 20 52 30 2c 20 | 23 30 0d 1b 8a 21 42 4c |CMP R0, |#0...!BL|
|00005590| 4e 45 20 6d 63 5f 70 75 | 74 5f 6e 65 78 74 5f 6f |NE mc_pu|t_next_o|
|000055a0| 75 74 70 75 74 5f 62 79 | 74 65 25 0d 1b 94 23 42 |utput_by|te%...#B|
|000055b0| 4e 45 20 6d 63 5f 74 72 | 61 6e 73 66 65 72 5f 6d |NE mc_tr|ansfer_m|
|000055c0| 65 73 73 61 67 65 5f 5f | 6c 6f 6f 70 31 25 0d 1b |essage__|loop1%..|
|000055d0| 9e 11 4d 4f 56 20 52 30 | 2c 20 23 97 22 20 22 0d |..MOV R0|, #." ".|
|000055e0| 1b a8 1f 42 4c 20 6d 63 | 5f 70 75 74 5f 6e 65 78 |...BL mc|_put_nex|
|000055f0| 74 5f 6f 75 74 70 75 74 | 5f 62 79 74 65 25 0d 1b |t_output|_byte%..|
|00005600| b2 46 53 55 42 20 52 30 | 2c 20 6d 63 72 5f 65 6e |.FSUB R0|, mcr_en|
|00005610| 64 5f 6f 66 5f 63 75 72 | 72 65 6e 74 5f 6d 65 73 |d_of_cur|rent_mes|
|00005620| 73 61 67 65 25 2c 20 6d | 63 72 5f 73 74 61 72 74 |sage%, m|cr_start|
|00005630| 5f 6f 66 5f 63 75 72 72 | 65 6e 74 5f 6d 65 73 73 |_of_curr|ent_mess|
|00005640| 61 67 65 25 0d 1b bc 22 | 41 44 52 20 52 31 2c 20 |age%..."|ADR R1, |
|00005650| 6d 63 64 5f 63 6f 6e 76 | 65 72 73 69 6f 6e 5f 62 |mcd_conv|ersion_b|
|00005660| 75 66 66 65 72 25 0d 1b | c6 24 4d 4f 56 20 52 32 |uffer%..|.$MOV R2|
|00005670| 2c 20 23 63 6f 6e 76 65 | 72 73 69 6f 6e 5f 62 75 |, #conve|rsion_bu|
|00005680| 66 66 65 72 5f 73 69 7a | 65 25 0d 1b d0 1d 53 57 |ffer_siz|e%....SW|
|00005690| 49 20 22 4f 53 5f 43 6f | 6e 76 65 72 74 43 61 72 |I "OS_Co|nvertCar|
|000056a0| 64 69 6e 61 6c 34 22 0d | 1b da 0e 4d 4f 56 20 52 |dinal4".|...MOV R|
|000056b0| 31 2c 20 52 30 0d 1b e4 | 20 2e 6d 63 5f 74 72 61 |1, R0...| .mc_tra|
|000056c0| 6e 73 66 65 72 5f 6d 65 | 73 73 61 67 65 5f 5f 6c |nsfer_me|ssage__l|
|000056d0| 6f 6f 70 32 25 0d 1b ee | 15 4c 44 52 42 20 52 30 |oop2%...|.LDRB R0|
|000056e0| 2c 20 5b 52 31 5d 2c 20 | 23 31 0d 1b f8 0e 43 4d |, [R1], |#1....CM|
|000056f0| 50 20 52 30 2c 20 23 30 | 0d 1c 02 21 42 4c 4e 45 |P R0, #0|...!BLNE|
|00005700| 20 6d 63 5f 70 75 74 5f | 6e 65 78 74 5f 6f 75 74 | mc_put_|next_out|
|00005710| 70 75 74 5f 62 79 74 65 | 25 0d 1c 0c 23 42 4e 45 |put_byte|%...#BNE|
|00005720| 20 6d 63 5f 74 72 61 6e | 73 66 65 72 5f 6d 65 73 | mc_tran|sfer_mes|
|00005730| 73 61 67 65 5f 5f 6c 6f | 6f 70 32 25 0d 1c 16 16 |sage__lo|op2%....|
|00005740| 4d 4f 56 20 52 30 2c 20 | 23 6e 65 77 73 5f 65 6f |MOV R0, |#news_eo|
|00005750| 6c 25 0d 1c 20 1f 42 4c | 20 6d 63 5f 70 75 74 5f |l%.. .BL| mc_put_|
|00005760| 6e 65 78 74 5f 6f 75 74 | 70 75 74 5f 62 79 74 65 |next_out|put_byte|
|00005770| 25 0d 1c 2a 1c 4c 44 4d | 46 44 20 52 31 33 21 2c |%..*.LDM|FD R13!,|
|00005780| 20 7b 52 30 2d 52 32 2c | 20 50 43 7d 5e 0d 1c 34 | {R0-R2,| PC}^..4|
|00005790| 04 0d 1c 3e 1b 2e 6d 63 | 5f 74 72 61 6e 73 66 65 |...>..mc|_transfe|
|000057a0| 72 5f 6e 65 77 73 5f 62 | 6f 64 79 25 0d 1c 48 1c |r_news_b|ody%..H.|
|000057b0| 53 54 4d 46 44 20 52 31 | 33 21 2c 20 7b 52 30 2d |STMFD R1|3!, {R0-|
|000057c0| 52 31 2c 20 52 31 34 7d | 0d 1c 52 18 a4 6d 63 6d |R1, R14}|..R..mcm|
|000057d0| 5f 74 72 61 63 65 5f 6e | 65 77 73 5f 62 6f 64 79 |_trace_n|ews_body|
|000057e0| 0d 1c 5c 46 53 55 42 20 | 52 31 2c 20 6d 63 72 5f |..\FSUB |R1, mcr_|
|000057f0| 65 6e 64 5f 6f 66 5f 63 | 75 72 72 65 6e 74 5f 6d |end_of_c|urrent_m|
|00005800| 65 73 73 61 67 65 25 2c | 20 6d 63 72 5f 73 74 61 |essage%,| mcr_sta|
|00005810| 72 74 5f 6f 66 5f 63 75 | 72 72 65 6e 74 5f 6d 65 |rt_of_cu|rrent_me|
|00005820| 73 73 61 67 65 25 0d 1c | 66 58 53 55 42 20 6d 63 |ssage%..|fXSUB mc|
|00005830| 72 5f 69 6e 70 75 74 5f | 62 75 66 66 65 72 5f 70 |r_input_|buffer_p|
|00005840| 6f 69 6e 74 65 72 25 2c | 20 6d 63 72 5f 73 74 61 |ointer%,| mcr_sta|
|00005850| 72 74 5f 6f 66 5f 63 75 | 72 72 65 6e 74 5f 6d 65 |rt_of_cu|rrent_me|
|00005860| 73 73 61 67 65 25 2c 20 | 6d 63 72 5f 69 6e 70 75 |ssage%, |mcr_inpu|
|00005870| 74 5f 66 69 6c 65 5f 77 | 69 6e 64 6f 77 25 0d 1c |t_file_w|indow%..|
|00005880| 70 1c 42 4c 20 6d 63 5f | 6c 6f 61 64 5f 69 6e 70 |p.BL mc_|load_inp|
|00005890| 75 74 5f 62 75 66 66 65 | 72 25 0d 1c 7a 21 2e 6d |ut_buffe|r%..z!.m|
|000058a0| 63 5f 74 72 61 6e 73 66 | 65 72 5f 6e 65 77 73 5f |c_transf|er_news_|
|000058b0| 62 6f 64 79 5f 5f 6c 6f | 6f 70 25 0d 1c 84 1c a4 |body__lo|op%.....|
|000058c0| 6d 63 6d 5f 67 65 74 5f | 6e 65 78 74 5f 69 6e 70 |mcm_get_|next_inp|
|000058d0| 75 74 5f 62 79 74 65 0d | 1c 8e 1d 4c 44 4d 43 53 |ut_byte.|...LDMCS|
|000058e0| 46 44 20 52 31 33 21 2c | 20 7b 52 30 2d 52 31 2c |FD R13!,| {R0-R1,|
|000058f0| 20 50 43 7d 0d 1c 98 1f | 42 4c 20 6d 63 5f 70 75 | PC}....|BL mc_pu|
|00005900| 74 5f 6e 65 78 74 5f 6f | 75 74 70 75 74 5f 62 79 |t_next_o|utput_by|
|00005910| 74 65 25 0d 1c a2 13 53 | 55 42 53 20 52 31 2c 20 |te%....S|UBS R1, |
|00005920| 52 31 2c 20 23 31 0d 1c | ac 24 42 4e 45 20 6d 63 |R1, #1..|.$BNE mc|
|00005930| 5f 74 72 61 6e 73 66 65 | 72 5f 6e 65 77 73 5f 62 |_transfe|r_news_b|
|00005940| 6f 64 79 5f 5f 6c 6f 6f | 70 25 0d 1c b6 41 4d 4f |ody__loo|p%...AMO|
|00005950| 56 20 6d 63 72 5f 73 74 | 61 72 74 5f 6f 66 5f 63 |V mcr_st|art_of_c|
|00005960| 75 72 72 65 6e 74 5f 6d | 65 73 73 61 67 65 25 2c |urrent_m|essage%,|
|00005970| 20 6d 63 72 5f 73 74 61 | 72 74 5f 6f 66 5f 6e 65 | mcr_sta|rt_of_ne|
|00005980| 78 74 5f 6d 65 73 73 61 | 67 65 25 0d 1c c0 58 53 |xt_messa|ge%...XS|
|00005990| 55 42 20 6d 63 72 5f 69 | 6e 70 75 74 5f 62 75 66 |UB mcr_i|nput_buf|
|000059a0| 66 65 72 5f 70 6f 69 6e | 74 65 72 25 2c 20 6d 63 |fer_poin|ter%, mc|
|000059b0| 72 5f 73 74 61 72 74 5f | 6f 66 5f 63 75 72 72 65 |r_start_|of_curre|
|000059c0| 6e 74 5f 6d 65 73 73 61 | 67 65 25 2c 20 6d 63 72 |nt_messa|ge%, mcr|
|000059d0| 5f 69 6e 70 75 74 5f 66 | 69 6c 65 5f 77 69 6e 64 |_input_f|ile_wind|
|000059e0| 6f 77 25 0d 1c ca 1d 3b | 42 4c 20 6d 63 5f 6c 6f |ow%....;|BL mc_lo|
|000059f0| 61 64 5f 69 6e 70 75 74 | 5f 62 75 66 66 65 72 25 |ad_input|_buffer%|
|00005a00| 0d 1c d4 1c 4c 44 4d 46 | 44 20 52 31 33 21 2c 20 |....LDMF|D R13!, |
|00005a10| 7b 52 30 2d 52 31 2c 20 | 50 43 7d 5e 0d 1c de 04 |{R0-R1, |PC}^....|
|00005a20| 0d 1c e8 1b 2e 6d 63 64 | 5f 63 6f 6e 76 65 72 73 |.....mcd|_convers|
|00005a30| 69 6f 6e 5f 62 75 66 66 | 65 72 25 0d 1c f2 28 45 |ion_buff|er%...(E|
|00005a40| 51 55 53 20 c4 63 6f 6e | 76 65 72 73 69 6f 6e 5f |QUS .con|version_|
|00005a50| 62 75 66 66 65 72 5f 73 | 69 7a 65 25 2c 20 bd 28 |buffer_s|ize%, .(|
|00005a60| 30 29 29 0d 1c fc 09 41 | 4c 49 47 4e 0d 1d 06 04 |0))....A|LIGN....|
|00005a70| 0d 1d 10 0f 2e 6d 63 5f | 6f 75 74 64 65 63 25 0d |.....mc_|outdec%.|
|00005a80| 1d 1a 1c 53 54 4d 46 44 | 20 52 31 33 21 2c 20 7b |...STMFD| R13!, {|
|00005a90| 52 30 2d 52 32 2c 20 52 | 31 34 7d 0d 1d 24 22 41 |R0-R2, R|14}..$"A|
|00005aa0| 44 52 20 52 31 2c 20 6d | 63 64 5f 63 6f 6e 76 65 |DR R1, m|cd_conve|
|00005ab0| 72 73 69 6f 6e 5f 62 75 | 66 66 65 72 25 0d 1d 2e |rsion_bu|ffer%...|
|00005ac0| 10 4d 4f 56 20 52 32 2c | 20 23 32 35 35 0d 1d 38 |.MOV R2,| #255..8|
|00005ad0| 1c 53 57 49 20 22 4f 53 | 5f 43 6f 6e 76 65 72 74 |.SWI "OS|_Convert|
|00005ae0| 49 6e 74 65 67 65 72 34 | 22 0d 1d 42 13 53 57 49 |Integer4|"..B.SWI|
|00005af0| 20 22 4f 53 5f 57 72 69 | 74 65 30 22 0d 1d 4c 14 | "OS_Wri|te0"..L.|
|00005b00| 53 57 49 20 22 4f 53 5f | 4e 65 77 4c 69 6e 65 22 |SWI "OS_|NewLine"|
|00005b10| 0d 1d 56 1c 4c 44 4d 46 | 44 20 52 31 33 21 2c 20 |..V.LDMF|D R13!, |
|00005b20| 7b 52 30 2d 52 32 2c 20 | 50 43 7d 5e 0d 1d 60 04 |{R0-R2, |PC}^..`.|
|00005b30| 0d 1d 6a 0f 2e 6d 63 5f | 6f 75 74 68 65 78 25 0d |..j..mc_|outhex%.|
|00005b40| 1d 74 1c 53 54 4d 46 44 | 20 52 31 33 21 2c 20 7b |.t.STMFD| R13!, {|
|00005b50| 52 30 2d 52 32 2c 20 52 | 31 34 7d 0d 1d 7e 12 53 |R0-R2, R|14}..~.S|
|00005b60| 57 49 20 32 35 36 20 2b | 20 97 22 26 22 0d 1d 88 |WI 256 +| ."&"...|
|00005b70| 22 41 44 52 20 52 31 2c | 20 6d 63 64 5f 63 6f 6e |"ADR R1,| mcd_con|
|00005b80| 76 65 72 73 69 6f 6e 5f | 62 75 66 66 65 72 25 0d |version_|buffer%.|
|00005b90| 1d 92 10 4d 4f 56 20 52 | 32 2c 20 23 32 35 35 0d |...MOV R|2, #255.|
|00005ba0| 1d 9c 18 53 57 49 20 22 | 4f 53 5f 43 6f 6e 76 65 |...SWI "|OS_Conve|
|00005bb0| 72 74 48 65 78 38 22 0d | 1d a6 13 53 57 49 20 22 |rtHex8".|...SWI "|
|00005bc0| 4f 53 5f 57 72 69 74 65 | 30 22 0d 1d b0 14 53 57 |OS_Write|0"....SW|
|00005bd0| 49 20 22 4f 53 5f 4e 65 | 77 4c 69 6e 65 22 0d 1d |I "OS_Ne|wLine"..|
|00005be0| ba 1c 4c 44 4d 46 44 20 | 52 31 33 21 2c 20 7b 52 |..LDMFD |R13!, {R|
|00005bf0| 30 2d 52 32 2c 20 50 43 | 7d 5e 0d 1d c4 05 5d 0d |0-R2, PC|}^....].|
|00005c00| 1d ce 0b ed 20 70 61 73 | 73 25 0d 1d d8 05 e1 0d |.... pas|s%......|
|00005c10| 1d e2 04 0d 1d ec 22 dd | a4 6d 63 6d 5f 70 72 69 |......".|.mcm_pri|
|00005c20| 6e 74 28 73 74 72 69 6e | 67 24 2c 20 6e 65 77 6c |nt(strin|g$, newl|
|00005c30| 69 6e 65 25 29 0d 1d f6 | 0f 5b 20 4f 50 54 20 70 |ine%)...|.[ OPT p|
|00005c40| 61 73 73 25 0d 1e 00 13 | 53 57 49 20 22 4f 53 5f |ass%....|SWI "OS_|
|00005c50| 57 72 69 74 65 53 22 0d | 1e 0a 10 45 51 55 53 20 |WriteS".|...EQUS |
|00005c60| 73 74 72 69 6e 67 24 0d | 1e 14 0a 45 51 55 42 20 |string$.|...EQUB |
|00005c70| 30 0d 1e 1e 09 41 4c 49 | 47 4e 0d 1e 28 05 5d 0d |0....ALI|GN..(.].|
|00005c80| 1e 32 10 e7 20 6e 65 77 | 6c 69 6e 65 25 20 8c 0d |.2.. new|line% ..|
|00005c90| 1e 3c 11 20 20 5b 20 4f | 50 54 20 70 61 73 73 25 |.<.  [ O|PT pass%|
|00005ca0| 0d 1e 46 16 20 20 53 57 | 49 20 22 4f 53 5f 4e 65 |..F.  SW|I "OS_Ne|
|00005cb0| 77 4c 69 6e 65 22 0d 1e | 50 07 20 20 5d 0d 1e 5a |wLine"..|P.  ]..Z|
|00005cc0| 05 cd 0d 1e 64 06 3d 30 | 0d 1e 6e 04 0d 1e 78 19 |....d.=0|..n...x.|
|00005cd0| dd a4 6d 63 6d 5f 70 75 | 74 5f 6d 61 69 6c 5f 68 |..mcm_pu|t_mail_h|
|00005ce0| 65 61 64 65 72 0d 1e 82 | 0f 5b 20 4f 50 54 20 70 |eader...|.[ OPT p|
|00005cf0| 61 73 73 25 0d 1e 8c 0e | 4d 4f 56 20 52 30 2c 20 |ass%....|MOV R0, |
|00005d00| 23 31 0d 1e 96 1f 42 4c | 20 6d 63 5f 70 75 74 5f |#1....BL| mc_put_|
|00005d10| 6e 65 78 74 5f 6f 75 74 | 70 75 74 5f 62 79 74 65 |next_out|put_byte|
|00005d20| 25 0d 1e a0 16 4d 4f 56 | 20 52 30 2c 20 23 6d 61 |%....MOV| R0, #ma|
|00005d30| 69 6c 5f 65 6f 6c 25 0d | 1e aa 1f 42 4c 20 6d 63 |il_eol%.|...BL mc|
|00005d40| 5f 70 75 74 5f 6e 65 78 | 74 5f 6f 75 74 70 75 74 |_put_nex|t_output|
|00005d50| 5f 62 79 74 65 25 0d 1e | b4 05 5d 0d 1e be 06 3d |_byte%..|..]....=|
|00005d60| 30 0d 1e c8 04 0d 1e d2 | 1d dd a4 6d 63 6d 5f 67 |0.......|...mcm_g|
|00005d70| 65 74 5f 6e 65 78 74 5f | 69 6e 70 75 74 5f 62 79 |et_next_|input_by|
|00005d80| 74 65 0d 1e dc 0f 5b 20 | 4f 50 54 20 70 61 73 73 |te....[ |OPT pass|
|00005d90| 25 0d 1e e6 11 54 45 51 | 43 53 50 20 50 43 2c 20 |%....TEQ|CSP PC, |
|00005da0| 23 30 0d 1e f0 40 43 4d | 50 20 6d 63 72 5f 69 6e |#0...@CM|P mcr_in|
|00005db0| 70 75 74 5f 62 75 66 66 | 65 72 5f 70 6f 69 6e 74 |put_buff|er_point|
|00005dc0| 65 72 25 2c 20 6d 63 72 | 5f 69 6e 70 75 74 5f 62 |er%, mcr|_input_b|
|00005dd0| 75 66 66 65 72 5f 6c 6f | 67 69 63 61 6c 5f 65 6e |uffer_lo|gical_en|
|00005de0| 64 25 0d 1e fa 1e 42 4c | 47 45 20 6d 63 5f 6c 6f |d%....BL|GE mc_lo|
|00005df0| 61 64 5f 69 6e 70 75 74 | 5f 62 75 66 66 65 72 25 |ad_input|_buffer%|
|00005e00| 0d 1f 04 2e 4c 44 52 43 | 43 42 20 52 30 2c 20 5b |....LDRC|CB R0, [|
|00005e10| 6d 63 72 5f 69 6e 70 75 | 74 5f 62 75 66 66 65 72 |mcr_inpu|t_buffer|
|00005e20| 5f 70 6f 69 6e 74 65 72 | 25 5d 2c 20 23 31 0d 1f |_pointer|%], #1..|
|00005e30| 0e 05 5d 0d 1f 18 06 3d | 30 0d 1f 22 04 0d 1f 2c |..]....=|0.."...,|
|00005e40| 24 dd a4 6d 63 6d 5f 74 | 72 61 63 65 5f 69 70 62 |$..mcm_t|race_ipb|
|00005e50| 75 66 28 6c 61 62 65 6c | 24 2c 20 74 79 70 65 24 |uf(label|$, type$|
|00005e60| 29 0d 1f 36 1a e7 20 64 | 65 62 75 67 25 20 80 20 |)..6.. d|ebug% . |
|00005e70| 64 65 62 75 67 5f 6d 63 | 25 20 8c 0d 1f 40 28 20 |debug_mc|% ...@( |
|00005e80| 20 e7 20 6d 63 64 65 62 | 75 67 25 20 80 20 6d 63 | . mcdeb|ug% . mc|
|00005e90| 64 65 62 75 67 5f 74 72 | 61 63 65 69 70 62 75 66 |debug_tr|aceipbuf|
|00005ea0| 25 20 8c 0d 1f 4a 13 20 | 20 20 20 5b 20 4f 50 54 |% ...J. |   [ OPT|
|00005eb0| 20 70 61 73 73 25 0d 1f | 54 1b 20 20 20 20 53 54 | pass%..|T.    ST|
|00005ec0| 4d 46 44 20 52 31 33 21 | 2c 20 7b 52 30 2d 52 31 |MFD R13!|, {R0-R1|
|00005ed0| 7d 0d 1f 5e 18 20 20 20 | 20 53 57 49 20 22 4f 53 |}..^.   | SWI "OS|
|00005ee0| 5f 4e 65 77 4c 69 6e 65 | 22 0d 1f 68 2f 20 20 20 |_NewLine|"..h/   |
|00005ef0| 20 a4 6d 63 6d 5f 70 72 | 69 6e 74 28 22 49 6e 70 | .mcm_pr|int("Inp|
|00005f00| 75 74 20 62 75 66 66 65 | 72 20 22 20 2b 20 6c 61 |ut buffe|r " + la|
|00005f10| 62 65 6c 24 2c 20 b9 29 | 0d 1f 72 30 20 20 20 20 |bel$, .)|..r0    |
|00005f20| a4 6d 63 6d 5f 70 72 69 | 6e 74 28 22 20 20 20 20 |.mcm_pri|nt("    |
|00005f30| 20 20 20 20 20 20 20 20 | 20 20 20 20 73 74 61 72 |        |    star|
|00005f40| 74 3a 20 22 2c 20 a3 29 | 0d 1f 7c 27 20 20 20 20 |t: ", .)|..|'    |
|00005f50| 4d 4f 56 20 52 30 2c 20 | 6d 63 72 5f 69 6e 70 75 |MOV R0, |mcr_inpu|
|00005f60| 74 5f 62 75 66 66 65 72 | 5f 73 74 61 72 74 25 0d |t_buffer|_start%.|
|00005f70| 1f 86 15 20 20 20 20 42 | 4c 20 6d 63 5f 6f 75 74 |...    B|L mc_out|
|00005f80| 68 65 78 25 0d 1f 90 30 | 20 20 20 20 a4 6d 63 6d |hex%...0|    .mcm|
|00005f90| 5f 70 72 69 6e 74 28 22 | 20 20 20 20 20 20 20 20 |_print("|        |
|00005fa0| 20 20 20 20 20 20 20 20 | 20 20 65 6e 64 3a 20 22 |        |  end: "|
|00005fb0| 2c 20 a3 29 0d 1f 9a 2d | 20 20 20 20 4d 4f 56 20 |, .)...-|    MOV |
|00005fc0| 52 30 2c 20 6d 63 72 5f | 69 6e 70 75 74 5f 62 75 |R0, mcr_|input_bu|
|00005fd0| 66 66 65 72 5f 6c 6f 67 | 69 63 61 6c 5f 65 6e 64 |ffer_log|ical_end|
|00005fe0| 25 0d 1f a4 15 20 20 20 | 20 42 4c 20 6d 63 5f 6f |%....   | BL mc_o|
|00005ff0| 75 74 68 65 78 25 0d 1f | ae 30 20 20 20 20 a4 6d |uthex%..|.0    .m|
|00006000| 63 6d 5f 70 72 69 6e 74 | 28 22 20 20 20 20 20 20 |cm_print|("      |
|00006010| 20 62 75 66 66 65 72 20 | 70 6f 69 6e 74 65 72 3a | buffer |pointer:|
|00006020| 20 22 2c 20 a3 29 0d 1f | b8 29 20 20 20 20 4d 4f | ", .)..|.)    MO|
|00006030| 56 20 52 30 2c 20 6d 63 | 72 5f 69 6e 70 75 74 5f |V R0, mc|r_input_|
|00006040| 62 75 66 66 65 72 5f 70 | 6f 69 6e 74 65 72 25 0d |buffer_p|ointer%.|
|00006050| 1f c2 15 20 20 20 20 42 | 4c 20 6d 63 5f 6f 75 74 |...    B|L mc_out|
|00006060| 68 65 78 25 0d 1f cc 30 | 20 20 20 20 a4 6d 63 6d |hex%...0|    .mcm|
|00006070| 5f 70 72 69 6e 74 28 22 | 20 20 20 20 20 20 20 20 |_print("|        |
|00006080| 20 20 66 69 6c 65 20 77 | 69 6e 64 6f 77 3a 20 22 |  file w|indow: "|
|00006090| 2c 20 a3 29 0d 1f d6 26 | 20 20 20 20 4d 4f 56 20 |, .)...&|    MOV |
|000060a0| 52 30 2c 20 6d 63 72 5f | 69 6e 70 75 74 5f 66 69 |R0, mcr_|input_fi|
|000060b0| 6c 65 5f 77 69 6e 64 6f | 77 25 0d 1f e0 15 20 20 |le_windo|w%....  |
|000060c0| 20 20 42 4c 20 6d 63 5f | 6f 75 74 68 65 78 25 0d |  BL mc_|outhex%.|
|000060d0| 1f ea 30 20 20 20 20 a4 | 6d 63 6d 5f 70 72 69 6e |..0    .|mcm_prin|
|000060e0| 74 28 22 20 20 20 20 20 | 20 20 20 20 66 69 6c 65 |t("     |    file|
|000060f0| 20 70 6f 69 6e 74 65 72 | 3a 20 22 2c 20 a3 29 0d | pointer|: ", .).|
|00006100| 1f f4 41 20 20 20 20 41 | 44 44 20 52 30 2c 20 6d |..A    A|DD R0, m|
|00006110| 63 72 5f 69 6e 70 75 74 | 5f 66 69 6c 65 5f 77 69 |cr_input|_file_wi|
|00006120| 6e 64 6f 77 25 2c 20 6d | 63 72 5f 69 6e 70 75 74 |ndow%, m|cr_input|
|00006130| 5f 62 75 66 66 65 72 5f | 70 6f 69 6e 74 65 72 25 |_buffer_|pointer%|
|00006140| 0d 1f fe 2b 20 20 20 20 | 53 55 42 20 52 30 2c 20 |...+    |SUB R0, |
|00006150| 52 30 2c 20 6d 63 72 5f | 69 6e 70 75 74 5f 62 75 |R0, mcr_|input_bu|
|00006160| 66 66 65 72 5f 73 74 61 | 72 74 25 0d 20 08 15 20 |ffer_sta|rt%. .. |
|00006170| 20 20 20 42 4c 20 6d 63 | 5f 6f 75 74 64 65 63 25 |   BL mc|_outdec%|
|00006180| 0d 20 12 09 20 20 20 20 | 5d 0d 20 1c 17 20 20 20 |. ..    |]. ..   |
|00006190| 20 e7 20 74 79 70 65 24 | 20 3d 20 22 74 22 20 8c | . type$| = "t" .|
|000061a0| 0d 20 26 15 20 20 20 20 | 20 20 5b 20 4f 50 54 20 |. &.    |  [ OPT |
|000061b0| 70 61 73 73 25 0d 20 30 | 32 20 20 20 20 20 20 a4 |pass%. 0|2      .|
|000061c0| 6d 63 6d 5f 70 72 69 6e | 74 28 22 20 20 20 20 62 |mcm_prin|t("    b|
|000061d0| 79 74 65 73 20 74 72 61 | 6e 73 66 65 72 72 65 64 |ytes tra|nsferred|
|000061e0| 3a 20 22 2c 20 a3 29 0d | 20 3a 2d 20 20 20 20 20 |: ", .).| :-     |
|000061f0| 20 53 55 42 20 52 30 2c | 20 52 32 2c 20 6d 63 72 | SUB R0,| R2, mcr|
|00006200| 5f 69 6e 70 75 74 5f 62 | 75 66 66 65 72 5f 73 74 |_input_b|uffer_st|
|00006210| 61 72 74 25 0d 20 44 17 | 20 20 20 20 20 20 42 4c |art%. D.|      BL|
|00006220| 20 6d 63 5f 6f 75 74 68 | 65 78 25 0d 20 4e 46 20 | mc_outh|ex%. NF |
|00006230| 20 20 20 20 20 43 4d 50 | 20 6d 63 72 5f 69 6e 70 |     CMP| mcr_inp|
|00006240| 75 74 5f 62 75 66 66 65 | 72 5f 70 6f 69 6e 74 65 |ut_buffe|r_pointe|
|00006250| 72 25 2c 20 6d 63 72 5f | 69 6e 70 75 74 5f 62 75 |r%, mcr_|input_bu|
|00006260| 66 66 65 72 5f 6c 6f 67 | 69 63 61 6c 5f 65 6e 64 |ffer_log|ical_end|
|00006270| 25 0d 20 58 1a 20 20 20 | 20 20 20 53 57 49 47 45 |%. X.   |   SWIGE|
|00006280| 20 32 35 36 20 2b 20 97 | 22 5b 22 0d 20 62 1a 20 | 256 + .|"[". b. |
|00006290| 20 20 20 20 20 53 57 49 | 47 45 20 32 35 36 20 2b |     SWI|GE 256 +|
|000062a0| 20 97 22 45 22 0d 20 6c | 1a 20 20 20 20 20 20 53 | ."E". l|.      S|
|000062b0| 57 49 47 45 20 32 35 36 | 20 2b 20 97 22 4f 22 0d |WIGE 256| + ."O".|
|000062c0| 20 76 1a 20 20 20 20 20 | 20 53 57 49 47 45 20 32 | v.     | SWIGE 2|
|000062d0| 35 36 20 2b 20 97 22 42 | 22 0d 20 80 1a 20 20 20 |56 + ."B|". ..   |
|000062e0| 20 20 20 53 57 49 47 45 | 20 32 35 36 20 2b 20 97 |   SWIGE| 256 + .|
|000062f0| 22 5d 22 0d 20 8a 1c 20 | 20 20 20 20 20 53 57 49 |"]". .. |     SWI|
|00006300| 47 45 20 22 4f 53 5f 4e | 65 77 4c 69 6e 65 22 0d |GE "OS_N|ewLine".|
|00006310| 20 94 0b 20 20 20 20 20 | 20 5d 0d 20 9e 09 20 20 | ..     | ]. ..  |
|00006320| 20 20 cd 0d 20 a8 13 20 | 20 20 20 5b 20 4f 50 54 |  .. .. |   [ OPT|
|00006330| 20 70 61 73 73 25 0d 20 | b2 18 20 20 20 20 53 57 | pass%. |..    SW|
|00006340| 49 20 22 4f 53 5f 4e 65 | 77 4c 69 6e 65 22 0d 20 |I "OS_Ne|wLine". |
|00006350| bc 1b 20 20 20 20 4c 44 | 4d 46 44 20 52 31 33 21 |..    LD|MFD R13!|
|00006360| 2c 20 7b 52 30 2d 52 31 | 7d 0d 20 c6 09 20 20 20 |, {R0-R1|}. ..   |
|00006370| 20 5d 0d 20 d0 07 20 20 | cd 0d 20 da 05 cd 0d 20 | ]. ..  |.. .... |
|00006380| e4 07 3d 20 30 0d 20 ee | 04 0d 20 f8 1e dd a4 6d |..= 0. .|.. ....m|
|00006390| 63 6d 5f 74 72 61 63 65 | 5f 69 70 62 6d 6f 76 65 |cm_trace|_ipbmove|
|000063a0| 28 74 79 70 65 25 29 0d | 21 02 1a e7 20 64 65 62 |(type%).|!... deb|
|000063b0| 75 67 25 20 80 20 64 65 | 62 75 67 5f 6d 63 25 20 |ug% . de|bug_mc% |
|000063c0| 8c 0d 21 0c 28 20 20 e7 | 20 6d 63 64 65 62 75 67 |..!.(  .| mcdebug|
|000063d0| 25 20 80 20 6d 63 64 65 | 62 75 67 5f 74 72 61 63 |% . mcde|bug_trac|
|000063e0| 65 69 70 62 75 66 25 20 | 8c 0d 21 16 13 20 20 20 |eipbuf% |..!..   |
|000063f0| 20 5b 20 4f 50 54 20 70 | 61 73 73 25 0d 21 20 1b | [ OPT p|ass%.! .|
+--------+-------------------------+-------------------------+--------+--------+